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Ismet egy uj tanev. Nem irhatom. 
hogy kezdodik, hiszen mar ne- 
hany hete folyik a tanitas. Vajon 
mit hoz ez az uj ev a szamitas- 
technika oktatasaban? Mit hoz- 
hat egyaltalan? 

Tudjuk, hogy az altalanos iskolai 
program beindul, tudjuk, hogy 
a kozepiskolai folytatddik. Tud 
juk, hogy egyre tdbbet ertenek 
a dologhoz azok a pedagogusok 
is, akiknek a kezeben vagyon 
a dolog. Tudjuk, hogy a kozep- 
iskolai szakkorok, s ujabban az 
altalanos iskolaiak is egyre fan- 
tasztikusabb eredmenyeket ernek 
el, tagjaik egyre fantasztikusabb 
teljesitmenyekre kepesek. Megis, 
a szerkeszto mar megint bostb- 
rog. Mar megint talal valamit, 
ami nem j6l van. Nehany evvel 
ezelott. amikor a program igaza 
bol beindult, egy kerekasztal 
beszelgetest szerveztiink, ahol 
epp a kozepiskolai oktatas volt 
a tema. Ott a jelenlevok - talan 
torzsolvasdink meg emlekeznek 
is ra - ket partra szakadtak. Az 

egyik fel azt mondta. hogy a kozepiskolai oktatas feladata, 
hogy megtanitsa a diakoknak a szamitogep hasznalatat, s eset- 
leg a legjobban erdeklodoknek lehetoseget adjon a programo- 
zas alapjainak elsajatitasara. A masik fel ezzel szemben azt 
kovetelte volna, hogy legyen a programozas nehany oraban 
mindenki szamara kotelezo tantargy, mert ez komoly szem- 
leletformalo hatassal bir. s egyebkent sem egy ordongosseg. 
A vita nem dolt el. nem is dolhetett el. Az iskolak gyakorlata 
azonban az elvek szintjen az elso allaspontot tiikrbzi. Ez vegul 
is ertheto, hiszen az az iskolankenti 1-2 gep nem elegendo 
masra. Amiert ez a kis iras most irodik - epp az, hogy vajon azt 
a bizonyos elso allaspontot tukrozi-e igazan az iskolakban 
folyo munka ? Megvalosul-e a eel, hogy tudniillik minden diak 
legalabb felhasznaloi szinten jusson a szamitogephez. Nos,epp 
ez az, hogy tavolrol sem. Adataink nincsenek r6la, de amugy 
saccolasos m6dszerrel kiilonosebben nagy batorsag nelkiil 
kijelenthetjiik, hogy a kozepiskolakban vegzo diakok legalabb 
otven szazaleka ma meg ugy hagyja el a kdzepiskolat, hogy 
soha nem latott kozelrol szamitogepet, hogy amennyiben g6p 
ele kellene iilnie eppolyan zavarba jonne, mint a nagymamaja. 
A szerkeszto inkabb azokkal ert egyet, akik azt mondjak, 
hogy az iskolakban akkor lehetne igazi szemleletformalo 
ereju szamitastechnikai oktatast vegezni, ha lenne lehetoseg 
a nehany oras kotelezo prog ramozoi targy bevezetesere. (Hogy 




ez mennyire fontos, azt a szer- 
keszto mar a gyakorlatban is ta- 
pasztalta. Felnott emberekkel is 
csak ugy sikeriilt megertetni, hogy 
hogyan tartja kezeben a prog- 
ramozo a gepet, hogyan tudja 
azt mondani a gepnek, hogy ezt 
is csinalja meg. meg azt is, 
hogy egy rovid programot 
izeire szedve nehany oraban be- 
mutattuk nekik. hogy is kell prog- 
ramozni. Ettol ok meg nem lettek 
programozok, nem is kell, hogy 
azok legyenek, de legkozelebb 
mar nem mondjak azt a bemuta- 
tast vezetonek, amit az ezt az 
oktatast megelozo bemutaton. 
hogy ,.- Mondja meg a gepnek. 
hogy meg rendezzen nevsorba 
is !".) 

A szerkeszto azonban tudomasul 
veszi a realitasokat. s belenyug- 
szik. hogy nines programozas. De 
abba mar nem tud belenyugodni, 
hogy a kozepiskolakban mindossze 
nehany tucat tehetseges diak jusson 
hozza a gepekhez. Rendben van, 

az 6 programozasi tudasuk ertek, nekik tbbb lehetoseget kell 
biztositani.hogygephezuljenek.Denefelejtkezziinkmegatob- 
biekrol sem! Adjunk lehetoseget, alkalmat nekik is! 
Igen am. mondhatom en, meg mondhatja meg rajtam kivul 
tobb tucat ujsagiro. pedagogus. hogy ez fontos. De ne feled- 
jiik. hogy az iskolak szamitastechnikai munkajat mindig a leg- 
jobbak teljesitmenye alapjan itelik meg. Annak alapjan. hogy 
milyen programokat kiild be az iskola szakkore a kulonbozo 
palyazatokra. meg annak alapjan. hogy a kulonbozo bemutato- 
kon hogyan szerepelnek a diakok. Igy hat egy olyan iskola, 
amelyikben van ket kivaloan programozo diak. s a szamito- 
gepet rajtuk kivul meg senki sem latta. jobb szinben tunhet 
fol az oktatasiigy iranyitoi elott, mint az, amelyikben nyolc- 
szazdiakbol 799 talalkozott mar a szamitogeppel. tudja kezelni, 
erti. hogy mire valo a gep, mit lehet vele csinalni, de egyikuk 
sem melyult bele a dologba annyira. hogy kiilonosebben erde- 
kes programot tudna irni. Marpedig az oktatasiigy iranyitoin 
sok mulik. Befolyasolja a tanar premiumat, fizeteset, hogy 
mi a r6la kialakult velemeny, s nem feledhetjuk azt sem. hogy 
az uj gepek elosztasanal is a kialakult ertekitelet a donto. 
Jo lenne tehat. ha az uj tanevben tobb figyelmet kapnanak 
a programozni nem tudok, ha az 6 kepzesiik, az 6 szemlelet- 
kialakitasuk nagyobb sullyal esne latba a tanari, iskolai munka 
megitelesenel. Angya/osi L4sz/6 
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Hiroldal - amelyb<5l megtudhatjak. hogy mire j6 a rend(5rchip 

A Comal 6s a grafika - juhusi szamunkban mutattuk be a C-64-esek uj ..6ruletet". a Comal-t. Most meg beljebb mutatjuk« 
VC 20 prolongilva - .mmaron k. tudja hanyadik h6na Pi a - ezuttal a gepi k6du sorozat harmadik reszeve! es harom hasznos 
szubrutinnal ! 

Micolor nyerd egy palyazat bekuldott programjai kozul illik a legjobbat kozolni. Kozoljuk az els6 feladat programjat! 
Markov-iz* - remeljuk. Lukacs Endre nem sertdd.k meg a cfm miatt. erdekes c.kket pedig batyja. Lukacs J6zsef ajanlja kegye.nkbe 
Szoftver dtletek - egy hasznos otlet ZX 81 -eseknek 

Ideik - pecsi olvas6nk idea, a szamft6gep-hasznalat tervezeserfil. e!6kesz(teser6l. megval6s.'tasar6l. Vitacikknek szanjuk' 
Sorvezetd a HT kulso magnetofonjanak hasznalatar6l sz6I6 hasznos irassal 
Posta - Egy C-1 6 tulajdonos oromteli gondjaival 

Bdrze - egy rovat. amely ugy tunik. varakozasamk ellen6re m6gis letrejon? - Rajtunk nem mulik! 
Primd nyerd - a harmadik feladat megoldasaval 

K6t g6p nyerff - uj palyazatunk k^t nyeremdnnyel - k6t kategbriaban - iskolai szakkoroknek ! 
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szazezer szem6lyi szami't6g6pet adott el - 
atmeneti anyagi gondokkal kuzd. Hatranyo- 
san 6rmtette. hogy ez 6vben visszaesett a g6- 
pek iranti kereslet. Ezen m6g az sem segftett. 
hogy Spectrum tfpusu g6pe arat 180-r6l 
130 fontra csokkentette. fgy tovabbi ambi- 
citizus fejleszt<5 munkaihoz mintegy 15 mil- 
I16 font kolcsont kfvan felvenni. - 



muvelet el<5tt megbizonyosodnak arr6l. hogy 
kulcsszavaik azonosak. Talalgatassal a kulcs- 
sz6ra rahibazm szinte a lehetetlennel egyenlfi 
6s igy kiza>t a szami't6g6pes buncselekm6- 
nyek elkovet6s6nek Iehet6s6ge. 



Minden eddiginel megbizhat6bb. huebb for- 
ditast vegzfi 6s gyorsabb japan-angol nyelvu 
fordftrig6pet k6szitett a japan Toshiba c6g. 
Az 6rank6nt otezer sz6t lefordftani k6pes. 
mikrosz6mit6g6pes berendezes kival6an al- 
kalmazhat6 a tudom6nyos szovegek 6s mu- 
szaki dokumentaci6k esetdben is. A szuper- 
fordit6 m6g ez 6vben piacra kerul. Fejleszt6i 
mintegy negyvenezer dolla>t k6rnek majd 



darabja6rt. 





Egy k's elektronikus kalkul6tor m6ret6vel 
azonos nagysagu mikroszam(t6g6pet fejlesz- 
tettek ki egy tallinni kutat6mt6zetben 6szt 
szakemberek. A rendki'vuli kis m6retet azzal m 
6rt6k el, hogy egy teljesen uj elven mukod6. n 
I6zeres konstrukcitit dolgoztak ki. L6zersu- ' 
garral frjSk be 6s taroljak az informaci6kat egy ( 
specialis t6rol6elem molekul£iban. Szovjet 
kutat6k ma> mintegy ti'z 6ve kidolgozt£k a 16- 
zeres inform^ci6bevitel, ta>olas. atvitel m6d- 
j6ra 6s a felhasznalhat6 anyagokra vonatkoz6 
elveket. 



A ci'mbeli mondat szerepel a Brazi'liaban for- 
galomba hozott mini- 6s mikrosz6mft6g6pek 
nagyr6sz6n. A kdzelmultban ujabb nyolc 
6vre meghosszabbftottak Brazi'liaban a hfres 
szamft(5g6pi piacv6d(3 torv6nyt. A torv6ny 
tovabbra is nyflt utat ad a hazai szamft6gep- 
fejleszt<5knek. Az els<5 brazil mikroszamftti- 
g6pek 1980-ban jelentek meg a piacon. Ma 
mintegy 16 000 embert foglalkoztatnak a 
latin-amerikai orszagban a szarmt6g6pioar- 
ban. 



Uj szolgaltatast vezetett be iden az Avis g6p- 
kocsikolcsonzfi vilagc6g. Angliai. irorszagi. 
spanyol 6s nyugatn6metorszagi telephelyein 
szami'tog6pes t6rk6pet adnak at mas orsza- 
gokb6l 6rkezett ugyfeleiknek. A t6rk6p eliga- 
zftja a g6pkocsivezet<5t, el<5segiti a Iegtakar6- 
kosabb uzemanyagfogyasztast. Az ugyf6lt<5l 
szarmaz6. az egy6ni 6rdekl6d6sre vonatkoz6 
adatok alapjan a szamlt6gep specialis m6- 
retre ..szabott" pi. szfnhcizat, koncerteket. 
vidam parkokat, stb. 6rint<5 utvonalt6rk6pet 
is k6szit. 





sz6mft6g6ppel vez6relt robotkarok szam- 
talan az ember sz6ma>a neh6z. vesz6lyes 
vagy igen faraszt6 munk^t elv6geztek ma> 
eddig is. Ujdonsagk6nt vehet<5 a legfrissebb 
informaci6. amely szerint Kalifomi6ban egy 
beteg agyab6l egy mikroszamit6g6ppel 6s 
egy r6tegvizsg£l6 berendez6ssel osszekap- 
csolt robotkar vett szovetmintcit. A muvelet 
jelent<5s6ge abban van, hogy a robot az 
embern6l pontosabban 6s biztosabban k6pes 
elv6gezni a mut6tet. ^ m 




Az egyesult allamokbeli Palo Alt6ban egy \ 
IBM szamft6g6pre alapozott automata 6tte- 
rem mukodik. Minden asztalba. melyekhez a 
vend6gek leulnek, be van 6pftve egy billen- 
tyuzet. A megrendelt 6telt. italt a pinc6r beuti 
az asztal billentyuzet6n. Az adatok azonnal 
megjelennek a konyhaban 6s elkezdfldhet a 
rendel6s elk6szft6se. A rendszer visszajelzi 
az 6tel elk6szultet is, s<5t az asztalba szerelt 
kijelzfln megjelenik az osszfogyaszt^s ^ra is. 



Aligha gyartottak valaha is olyan term6ket a 
vilagon, melynek ara annyira zuhant volna, 
mint az integrant ^ramkdrok6. M6gis a gyar- 
t6sukkal foglalkozb nagy c6gek egyre na- 
gyobb profitot tehetnek zsebre 6vente. A h6- 
rom elektronikai nagyhatalom az Egyesult 
Allamok. Japan 6s Nyugat-Eur6pa piaci 
forgaima nagyreszben integr6lt aramkorok- 
b6l 1984-ben e!6rte a 23,5 milliard dollart, 
ami 1983-hoz k6pest 25 sz6zal6kos emelke- 
dest jelentett. Az ez6vi forgalom novekedese 
hasonl6 m6rtekben varhatd. 




1 




w 

i 



Sir Chve Sinclair a r6la elnevezett nagy- 
sikeru. olcsd mikrosz^mi't6g6pek kifejleszt6- 
je - ba> p6ld^ul a mult 6vben kozel nyolc- 
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Kozismert. hogy milyen hatalmas karokat 
okoznak szerte a vil6gon a sz6mi't6g6pes 
bunoz6k. Ezek a k6rok csak novekedtek az- 
zal. hogy a szem6lyi szamft6g6pek nagy szS- 
ma kapcsolbdik a kozponti sz6mit6g6pekb6l 
ki6pitett nagy hal6zatokra. Az illet6ktelen in- 
formaci6hoz jut^st kulbnf6le hardver- 6s szoft- 
vermegold^sokkal igyekeznek kikuszobolni. 
A legujabb v6dekez6si m6dot az amerikai 
INTEL c6g ,.rend6r" chipje, az ugynevezett 
KEPROM (Key - azaz kulcs - 6s az EPROM 
szo 6sszet6tel6b<5l) biztositja. A specialis 
chip egy 64 bites kulcssz6 segits6g6vel 
megoldja, hogy csak az illet6kess6ggel ren- 
delkez<5 terminalok csatlakozhassanak a koz- 
ponti szami't6g6pre. Az adatatviteli vonalak 
mindk6t v6g6n van egy-egy ilyen ujraprog- 
ramozhat6 KEPROM. amelyek az olvas6si 



Az uj osszetett mikroprocesszorok teszte!6se 
komoly probl6makat okoz az Intelnek 6s a 
Zilognak egyar6nt. A Zilog p6ldaul mar 1 983 
nyaran bejelentette a Z80000 tfpusu 32 bites 
processzorat. A sz6lh't6sok kezdet6t 1984. 
masodik fel6re tuzt6k ki. de a hibakeres6s, 
tesztel6s neh6zs6gei miatt ez nem v6rhat6 
1986 el6tt. 

Az Intel legujabb processzoraban, a 80286- 
osban hiba jelentkezett 6s ez k6sleltete a 
Digital Research munkajat a 286-os kon- 
kurrens operacios ^endszeren. A hibat. a 
80286-os harmadik verzi6j6ban fedezt6k 
csak fel. Az Intel lealli'totta a 432-es chip 
gyartasat. de er6teljesen fejleszti az uj. 
80386-os chipet. 

• 
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A Commodore International a hannoveri 
vasaron mutatta be uj. tobbfelhasznal6s. 
UNIX-szeru rendszeret es egyedi munka- 
allomasat. Az uj szamit6gep - meglep<5en 
olcs6n - 4000 dollar alatt lesz kaphat6. 
A munkahely keperny6je 14 inches. 1024x 
800-as felbontasu. A videovezerlo" 1 28 Kbyte 
RAM-ot hasznal es Bit-BLT technol6giat 
fog alkalmazni. 

A processzor egy Z8000. minimum 51 2 Kbyte 
RAM-al A tdbbfelhasznal6s. tobbtaszkos 
rendszer az ATZT UNIX VII rendszerevel 
kompatibilis. A rendszer alapkiepitesben tar- 
talmaz egy 20 Mbyte-os Winchester es egy 
1-2 Mbyte-os floppy hatte>tarat. Opcionali- 
san kaphat6 hozza streamer (men6-szalag). 
masodik floppy meghajt6. vagy 40 es 67 
Mbyte-os Winchester tarol6. A felhasznaltf 
altal hasznalhat6 mem6ria 2 Mbyte lehet 
maximum. Eur6paban a forgalmazas ez 6v 
szeptembereben kezd6dik. 



Sokfele szamltastechnikai tabort rendeztek 
mar hazankban. de olyat. ahol minden tabor- 
Iak6nak jutott volna egy szamft6g6p. aligha. 
Most ilyenre kerul sor Vepen. az EndrGdy 
kastelyban. A taborban nyolc turnusban. 
mmtegy hetszazhusz gyermek ismerkedhet 
meg a szami'tastechnikaval. A gepeket az 
angol Commodore es hazai partnere a 
Novotrade RT bocsajtja rendelkezesre. Az 
angliai taborok mintajara megrendezett tan- 
folyamokon Commodore 16-os gepeken 
gyakorolhatnak a gyerekek. 




Az Egyesult Allamokban. az ut6bbi hat h6- 
napban er6s visszaes^st tapasztaltak a sza- 
mftbgep-forgalmazok. M(g 1981-82-ben a 
szamftastechnika piaca ..recesszi6-all6" volt, 
ugy tunik. ebben az evben ez a piaci szeg- 
mens is beallt az altalanos beruhazasi szfn- 
vonalra. Az Egyesult Allamokban a nem 
katonai jellegu termel6eszkozok vasarlasa 
marciusban 8%-kal esett. aprilisban tovabbi 
7%-kal. A szamit6g6p-beruhazasok ennel is 
gyorsabban estek vissza. Az IBM peldaul 
aprilisban 30%-kal kevesebb rendelest ka- 
pott. mint az el<5z<5 h6napban. 
A Data Resources nevu ceg progn6zisa sze- 
rint a szamitbgepes piac novekedesi uteme az 
1984-es 16%-r6l 3%-ra esik vissza az iden. 
Az amerikai szami't6gepipar minden remeny- 
sege a szemelyi szam(t6gep eladasok nove- 
kedeseben van. Ezeket a sz.am»t6gepeket. 
nevuk ellenere. tobbsegeben az 1000 f<5nel 
tobbet foglalkoztat6 cegek veszik. A jbslasok 
szerint. ha ezek a vallalatok maradnak a f<5 
vasarl6k. akkor a szemelyi szamft6gepek el- 
adasa nem fog n<5ni megfelel6 mertekben. 
A legnagyobb problemat az jelenti. hogy a 
nagy mennyisegu es sokfajta szamft6gepet 
nehez halbzatba kotni. Ezen a teruleten sur- 
get6 a megfelelo" techno!6gia kialakitasa. 
A miniszamitugep-gyart6k kulonlegesen ne- 
hez helyzetben vannak. mert az IBM PC AT 
es a Compaq AT kompatibilis gepe kozvet- 
lenul veszik fel veluk a versenyt. A Data 
General nevu ceg peldaul kenytelen volt 1 300 
munkatarsat elbocsatani es a ceg tortenete- 
ben e!6szor veszteseggel zarta a felevet. Maga 
az IBM is arr6l szamol be. hogy kozepes 
meretu szamitbgepeinek eladasa visszaesett. 
Minden amerikai szamit6gep-gyart6 a be- 
ruhazasok visszaesese miatt szenved. liven 
helyzetben az IBM is veszelyesebbe valik es 
erfiteljesebben kuzd versenytarsai ellen. Az 
iroda-automatizalas teruleten tett lepesei 
mans komoly problemakat okoznak a Wang 
szamlt6gep-gyart6 cegnek. A Wang 1600 
embert volt kenytelen elbocsatani. 
A mikroszamft6gep-gyart6k kozul az Apple 
kuzd a legnagyobb gondokkal. 
Harom telephelyet lezarta es 1200 embert 
tettek ki allasabol. Az Apple hagyomanyosaTi 
a kisebb cegek es az oktatasi intezmenyek 
kozott talalt vev6kre eddig. A szamltastech- 
nikai piacot a felhasznal6hoz kbzelibb szoft- 
ver es a hal6zatok technol6giajanak attorese 
mentheti ki jelenlegi nehez helyzetebfil. 





A szerkesztd azert van. 




^ogy a lap olyan legyen. 


amilyenek az o/vasoif 




0010 // 

0020 // SPRITE BEHUTRTO 
0030 

0033 BACKGROUND 0 

0034 BORDER 0 

0040 Din RDRTf OF 63 

004? IW4-X<63> 

0030 FOR R*i TO 63 DO 

0060 REftD X<R> 

0080 RDRTf ' «RDRT*+CHR*<X<R> > 

0030 ENDFOR R 

0091 // 

0093 // R 8. SPRITE -BR TOLTJUK R2 RDRTOKRT 
0096 // * 
0100 DEFINE 0, RDRTf +CHR$<8> 
0110 // 

0120 // 4 SPRTE-BR VISSZUK RT R 0.-BRN LEVO RDRTOKRT 

ex 23 // 

0124 SETGRRPHIC C 
0140 IDENTIFY 0,0 
0130 IDENTIFY 1,0 
0160 IDENTIFY 2,0 
0170 IDENTIFY 3,8 
0180 // 

0190 // S2IN BERLLITRS 
0200 

0210 SPRITECOLOR 0.2 
0230 SPRITECOLOR 1,1 
0240 SPRITECOLOR 2,3 
0230 SPRITECOLOR 3,8 
0260 // 

0270 // R MERETEK BERLLITRSR 
0280 // 

0300 SPRITES I ZE 0,1,1 
0310 SPRITESIZE 1,1,1 
0320 SPRITESIZE 2,1,1 
0330 SPRITESIZE 3,1,1 
0340 // 

0330 // R LRTVRNY 
0360 // 

0370 SETGRRPHIC 0 

0390 R'*0 

0391 REPERT 
8392 R J »fl+l 

0393 MOVETO 123,R*Z+28 
0393 SETXY 123,R#2+20 
0428 ^PRITEPOS 0,40,R*2 
0430 SPRITEPOS 1,80,R*Z 
8440 SFRITEPOS 2,120/flW 
0438 SPR I TEPOS 3* 1 60 , R*2 
0468 UNTIL R*180 
8480 REPEAT 

0490 UNTIL KEYf OCHRf (8) 
0380 END 

1880 DATA 0/127,8/1,233,192,3,233.224,3,231,224 
1010 DRTR 7/217,248,7,223/240,7,217,240,3/231,224 
1820 DRTR 3> 233, 224, 3/ 233, 224, 2, 233, 160, 1 , 127, 64 
1038 DRTR 1,62,64,8,136,128/0/136,128,0,73/0,0,73,8,8 
1848 DRTR 62, 0,8, 62, 8,8, 62, 8.0. 23, n 



S 2* M HASH CHNIKAI MEUEKIET SZfPTfMBER 



A nagyfelbontasu graf ikarol szolo 
cikk utan, most a COMAL uta- 
sitas definialo kepess6g6rol 6s a 
sprite grafikat segito utasitSsok- 
rol olvashatnak. 

Ha Basic-ben egy muveletsoro- 
zatot tobbszor el szeretnenk erni, 
akkor szubrutinokat k6szrtiink. 
A COMAL-ban ez nem 611 rendel- 
kez6sunkre. A szubrutinok helyett 
egy sokkal k6nyelmesebb 6s 6t- 
tekinthetobb modszert kinal a 
rendszer. Ez az utasitas a definia- 
16s. Egy aitalunk meghatarozott 
utasit6sra a programban barhol 
6s barmikor hi vatkozhatunk, eset- 
leg a program megalh'tasa utan 
parancsk6nt is hasznalhatjuk. Az 
uj uzenetet a gep csak addig tudja 
felhasznalni 6s visszaeml6kezni 
r6, amfg egy v6ltoz6 az 6rt6k6t 
megtartja. Az utasitast nem tud- 
juk felhasznalni tobbet, pi.: NEW 
utan, RUN utan, LIST utan stb. 
Az uj parancsot a programbol 
tudjuk csak definialni. Az utasi- 
tas definialasara peldanak nezzuk 
meg a „TtGLALAP" cimG prog- 
ramot! A TEGLALAP utasitas de- 
finialasa a 10. sortol a 80-as sorig 
tart. Az uj muvelet nevet a mu- 
velet elott kell megadni, a PROC 
utasitas mogott. Az aitalunk k6- 
szftett utasitas neve utan zaro- 
jelben kell feltuntetni az esetleges 
param6terek jelol6s6t (vesszdvel 
elvalasztva). Majd azt a sort, 
amelyben az uj utasitas neve ta- 
lalhato, koveti az utasitasnak ele- 
get tevo programocska (alprog- 
ram). Az alprogram v6g6n a de- 
finialt utasitast le kell zarnunk 
(hasonlo modon, mint a cikluso- 
kat) egy ENDPROC-kal, ami utan 
meg kell adni az uj parancs nev6t. 
A peldaprogramunkban a 100 6s 
120 kozotti sorok hasznaljak fel az 
uj utasitast. Egy programban tobb 
definialt utasitas is lehet, de egy- 
masba skatulyazni nem tudjuk 
oket a definitional. 
A TEGLALAP 6s a HAZ ci'mu 
programok mutatjak be, hogy ho- 
gyan is lehet elni ezzel a leheto- 
s6ggel. 

• 



A 




Sprite kezeles: 

A COMAL ugyanugy, mint a tobbi 
grafikai programnyelv Iehet6s6- 
get nyujt sprite-kezel6sre is. 
A sprite felhasznalas elso lepese 
itt is az alakzat megtervez6se. 
A Basic-hez hasonl6an a sprite 
adatait DATA sorokban helyez- 
zuk el, csak a betoltesuk ter el 
egy kicsit a megszokott6l. 
Elso I6p6sk6nt egy 63 karakternyi 
stringet kelldimenzion£lni,ugyan- 
is a COMAL sajnos nem tudja ugy 
kezelni a szoveges v£ltoz6kat, 
mint a Basic (minden rendszernek 
van hib£ja). A string dimenzion£- 
lasa a 40. sorban tdrtSnik. Az ada- 
tok tdmbbe val6 beolvas£sa az6rt 
tdrt6nik, hogy a k6t DIM kozti 
kiil6nbs6g 6szrevehet6 legyen. 
A sprite-kezel6shez sziiks6ges 
utasftSsokat az 1. tSbl£zat tar- 
talmazza. 



0010 PROC TEOLALAP < H05SZUSAG * SZELESSEG 

FOR TO 2 DO 

0930 FORWARD HOSSZUSAG 
0040 RIGHT 90 
0PI5* FORWARD SZELESSEG 
0060 RIGHT 30 
0070 ENDFOR J 
^089 ENDPROC TEGLHLflP 
0085 SETGRAPH1C 0 
0090 BACK 70 

PI100 FOR T:-0 TO 90 STEP 3 W 
0103 TEGLALAP<90-T/2, 90-T> 
0110 LEFT 3 
0113 FORWARD 3 
0120 ENDFOR T 



0010 

0920 
0030 
0040 
0030 
0060 
0070 
0080 
0090 
0100 
0110 
0120 
0130 
0140 
0130 
0160 
0170 
0180 
0190 
0200 
0210 
0220 
0230 
0240 
0230 
0260 
0270 
0280 
0290 
0300 
0310 
0320 
0330 
0340 
0343 
0330 
0360 
0370 
0380 
0390 
0400 
0410 
0420 
0430 
0440 
0430 



// HRZ UTHSITRS ES RAJZOLAS 

// 

PROC HAZCNT> 
FORWARD NT 
LEFT 90 
FORWARD NT 
LEFT 90 
FORWARD MT 
LEFT 90 
FORWARD MT 
LEFT 90 
FORWARD NT 
LEFT 30. 
FORWARD NT 
LEFT 120 
FORWARD NT 
LEFT 30 
FORWARD NT 
LEFT 90 

FORWARD <MT/2>-C?1T/2V4 
LEFT 90 
FORWARD NT/2 
RIGHT 90 
FORWARD NT/4 
RIGHT 90 
FORWARD NT/2 
LEFT 90 

FORWARD < NT/2 >-< NT/2 V4 
LEFT 90 
ENDPROC HAZ 
SETGRAPHIC 0 
BORDER 0 
BACKGROUND 0 
PRINT M 
PENUP 

NOVETO 10*30 
PEN DOWN 

FOR A : *l TO 8 DO 
PENCOLOR R 
HAZCAW10) 
RIGHT 90 

FORWARD C.A»10? + 10 
LEFT 90 
ENDFOR A 
END 



DATACOLLISI ON n, (TRUE v. FALSE) 

SPRITECOLLISION n, (TRUE v. FALSE) 

DEFINE n, xS 

IDENTIFY n, d 
PRIORITY n, p 

SPRITEBACK s1, s2 
HI DESPRITE n 
SHOWSPRITE n 
SPRITECOLOR n, c 
SPRITEPOSITION n, x, y 
SPRITESIZE n, x, y 



Sprite es karakter titkdzeset vizsgalja, ahol n a sprite szama. 
A masodik parameter TRUE, ha igaz, vagy FALSE ha nem. 
Sprite-sprite Otkdzest vizsgal. 

A sprite definialasa. n a sprite szama. x$ az adatokat tartal- 

mazd string valtozb. 

Az n. sprite-ot azonossa teszi d.-kel. 

A prioritas (elsObbseg) beallitasa. n a sprite szama, p=0 

grafika fdldtt van a sprite, p=1 alatta. 

Multicolor sprite szinei. 

n. sprite eltGnik. 

n. sprite megjelenik. 

n. sprite szine c. lesz. 

n. sprite x, y kordinataba koriil. 

n. sprite x, y iranyu nagyitasdt adja meg. 
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GEPI KOD III. 



Ha egy gepi k6du programot kezdunk irni, legelso teendonk 
meghata>ozni, hogy hoi helyazzuk el a mem6riaban. Legcel- 
szerubb, a felhasznalhat6 BASIC-teriiletbol lecsfpni egy dara- 
bot, azt letiltani az interpreter szamara, nehogy veletlenul 
rairjon valamit, s gepi k6du programunkat oda betolteni, 
hasznalva a POKE utasitast. 

A felhasznalhato BASIC-terulet bovito nelkiil a 4096-os 
cfmtol a 7680-as cimig terjed. Az interpreter a BASIC-prog- 
ramot a 4096-os cimtol kezdi szepen soronkent elhelyezni 
a memoriaba. Ha tehat van egy 200 byte hosszu gepi kddu 
programunk, akkor a memdria veget megszabhatjuk 7680 he- 
lyett peld£ul 7400-ban, amelynek ketbyte-os formaja: 
232,28 (mivel 28*256+232 = 7400). A letiltashoz a kovetkezo 
utasitast kell beadnunk: 

POKE 55,232:POKE 56,28:CLR 

Ettol fogva az interpreter nem e>inti a 7400-7680-ig terjedo 
teruletet. ha mondjuk valtozdkat akar elhelyezni a mem6ria- 
ban. 

Tovabba felhasznalhatjuk gepi k6du rutinok szamara a 828- 
1023-ig terjedo kazettaterulete is, ha nem hasznaljuk a kazet- 
tas magnot, vagy a 673-767-ig terjedo memdriateruletet, amit 
az interpreter ritkan szokott basznalni. A most kovetkezo 
rovid gepi k6du programot. amit pelda-programnak szanok, 
a 673-as cimtol fogjuk a memori^ban elhelyezni, fgy valameny- 
nyi BASIC-teruletunk szabad marad, 6s amfg a gepet kikap- 
csoljuk, addig a program mQkodni fog. A NEW utasltasr6l j6 ha 
tudjuk, hogy egyetlen esetben sem torli a g6pi k6du progra- 
munkat, igy azok egy uj BASIC-program megirasakor is fel- 
hasznalhatbk. Az alabbi program a PLOT es COLOR utasita- 
sokat fogja megvalositani a VC-20 g^punkon a@es a € szim- 
b6lumok hasznalataval, a korabban ismertetett k6dok hasz- 
nalatanak a bemutatasara. A programot k6t reszbol allitjuk 
ossze. Az elso ertesere adja az interpreternek, hogy hoi kezdo- 
dik a masodik rutinunk; a masodik vegzi a PLOT 6s COLOR 
utasitasok v^grehajtasat. 

A 776-777 cim arra a ROM-rutinra mutat, amelyik a BASIC- 
utasftasokat kodjaik alapjan szetvalogatja es az utasitast 
vegrehajt6 szubrutint meghlvja. A mi programunk kozbe lesz 
iktatva ebbe a folyamatba. A 776-777 cim atir£sa utan a mi 
keziinkbe kerul eidszorre az utasitasvizsgalat sora. Meg- 
vizsgaljuk, hogy a vagy kovetkezik-e, ha nem, akkor vissza- 
adjuk a szot az interpreternek, ha igen, akkor a mi megfeleld 
szubrutinunk kerul vegrehajt^sra es csak utana adjuk vissza 
a sz6t az interpreternek. 

673: LD A 172 = 169, 172 ; az akkumulatorba toltjuk a 684 

cim elso felet 

675: STA C776 = 141,8,3,; es betoltjiik a rendszermutat6ba 
678: LDA 2 ■ 169,2 ; a 684 cim masodik felet toltjuk be 

680: STA C,777 = 141,9,3 ; es betoltjiik a rendszermutat6ba 
683: RTS = 96 ; visszate>es szubrutinb6l 

684: JSR C.115 = 32,115.0; meghlvjuk azt a rutint, amely el- 

hozza a vegrehajtas alatt alio sor 
kovetkezo byte-janak a tartalmat 



687: CMP 64 ■ 201,64 ; megvizsgaljuk egyenl5-e a@k6d- 

javal 

689: BEQ PLOT = 240,27 ; ha igen, ugras a PLOT vegrehajtd 

rutinhoz. 

Jelen esetben, ha teljesul a f eltetel, az ugrasi cfm a kovetkezo- 
keppen sz6mit6dik ki 
PC = 691 :a = 27 

(A PC mindig a soron kovetkezo utasitasra mutat) 

CIM = PC + a + 256*(a>127) ■ 691 +27+256*0 = 718 
691 : CMP 92 = 201, 92 ; megvizsgaljuk, most egyenlo-e £ 

kbdjaval 

693: BEQ COLOR = 240,6 ; ha igen, ugras a COLOR rutinra. 

695: JSR C121 = 32.131.0 ;ez azonos a 115-clmG rutinnal, 

csak nem a kovetkezo. hanem az 
elobb elhozott byte tartalmat 
hozza el ismet 

698: J MP 

C, 51175 = 76,231,199; mivel sem a @ sem £ nem volt, 
visszaadjuk a sz6t az interpreter- 
nek 

COLOR = 701 :JSR 

C551 95 = 32,1 55,21 5 ; meghfvunk egy ROM-rutint, amely 
kiszamitja a £ utan kovetkezo 
max. 255-os ^rteket, es betolti az 
X regiszterbe 

704: STX.C 

646 = 142,134,2 ; beallltjuk a „karakter szine" mu- 
tat6t 

707: BEQ END = 240,6 ; az elobb hasznalt ROM-rutin az 

akkumulatorba toltotte a szam 
utan levo byte tartalmat. Ha az 
kettospont vagy nulla, akkor 
Z-bit = 1, tehat az utasitasunk 
befejezodott, es ugrunk az END 
rutinunkra 

709: JSRC, 

57853 = 32,253,225 ; ha nines vege az utasitasunknak, 
akkor ez a meghivott rutin ellenor- 
zi, hogy vesszo kovetkezik-e, es ha 
szintaktikusan helyes, akkor ki- 
szamitja a vesszo utani kifejezes 
erteket es betolti az X-regiszterbe 

712: STX C, 

36879 = 142,15,144 ; ezzel az ertekkel beallitjuk a hatter 
6s keretsztn mutat6t. 

END = 715: JMP C, 

51118 = 76,174,199 ; es visszaadjuk a sz6t az interpre- 
ternek 

PLOT = 718:JSRC, 

55195 = 32,155,215 ; X-regiszterbe betoltjiik a @ utani 
szam erteket, ez lesz a sorkoordi- 
nata 

721 : CPX,23 = 224,23 ; megvizsgaljuk, kisebb-e23-nal, mi- 
vel csak 0-22 sorunk van 

723: BCC OK = 144,3 ; ha igen, akkor folytatjuk a progra- 
mot 

HIBA = 725:JMP 

C.53832 = 76.72,210 ; ha nem, akkor az lllegol Quantity 
hibauzenet-jelzesnek adjuk at a 
sz6t. 

OK = 728:STX 

Z.176 = 134,176 ; eltessziik sorkoordinatank ert6k6t 
egy zerblapos cimre 
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730:JSR C. 

57853 = 32.253,225 ; ez a rutin hozza el a masik adatot 
az X-regiszterben, es megvizsgal- 
ja, hogy szintaktikusan helyesen 
vesszdvel vannak-e elvalasztva 
egymastdl 

rnegvizsgaljuk, hogy oszlopkoor- 
dinatank kisebb-e 22-nel 
ha nem kisebb. ugras vissza a hiba- 
uzenet-rutinra 

(Itt lathatjuk azt a peldat. amikor a - 127 4rtek all az "tasjtas 
titan. Mivel PC = 737 :a = 244, ezert Cl M = PC + a + 256* 
(a>127) = 737+244+256*(-1) = 737 * 244-256 = 725) 



733.CPX.22 = 224,22 
735:BCS HIBA = 176,244 



737:TXA = 138 
738:TAY = 168 
739 : LDX Z,176=166,176 



741 



744 



: JSR C, 
58634 = 32.10,229 



az oszlopkoordinatat cserevel 
attdltjuk a Y-regiszterbe 
visszatoltjiik X-regiszterbe a sor- 
koordinatat a zer6lapr6l 

meghSvunk egy kurzorallltd ROM- 
rutint 



JMP 
C.5118 



76,174,199 ; es visszaadjuk a sz6t az interpre- 
ternek 

Van tehat ket m0kdd6 utasitasunk, amellyel tudjuk alhtani 
a kurzor koordinatakat. a karakterszineket, a hatter 6s keret- 
szmeket rendkfviil gyorsan es rdviden, a kovetkez6keppen 
(cb X.Y : £S1,S2:PRINT"A" 

Ahol X a sorkoordinata, Y az oszlopkoordinata, S1 a karakter- 
szfn erteke. S2 a hatter es keretszln POKE-erteke. M.ndegyik 
erteket tetszdleges aritmetikai es logikai kifejezesekkei is 
megadhatjuk. Az IF THEN utasitas hasznalata eseten a THfclM 
es a hasznalt szimb6lumok koze tegyunk kett6spontot pi. 
IF RND(1 ) > 0,5THEN:@10,10:PRINT„OK" 
Miutan elkeszltettuk a gepi k6du programunkat, toltsuk be 
a gepbe. Erre szolgal ez a kovetkezd BASIC-rutin. 

1 0 DATA 1 69,1 72,1 41 .8. 3,1 69,2.1 41 ,9 

20 DATA 3,96,32,115,0,201,64.240 

30 DATA 27,201,92.240,6,32.121,0,76 

40 DATA 231,199,32,155,215,142.134,2 

50 DATA 240,6,32,253,225,142,15.144,76 

60 DATA 174,199,32,155,215,224,23,144 

70 DATA 3,76,72,210.134,176,32,253 

80 DATA 225,224,22.176,244.138.168.166 

90 DATA 176,32.10,229,76,174.199 
100 A = 673 4 
110 READ X 

120 POKE A,X : A = A + 1 :N = N+X 

130 IF A < 747 THEN 110 

140 IF N ■<>■ 8984 THEN PRINT 

* HIBA AZ ADATBEVITELBEN !" END 
150 SYS 673* NEW 

A DATA- ban tarolt gepi k6du programot a 1 1 0-1 30 sorok toltik 
be a 673-as clmtdl kezd6d6en. A 140-es sorban egy adatbeviteh 
ellendrzes tortenik. A 150-es sorban kapcsoljuk be progra- 
munkat az INTERPRETER mOkodesebe. majd ttjrH|J»^ 
programunkat. Az alabbi kis programmal kiprdbalhatjuk uj 
utas'itasainkat .J; I 

10 PRINT CHRS (147) 
20 FOR I = 0 TO 20 
30 FOR J = 0TO 20 
40@l, J 
50 t J 

60 PRINT CHR$ (64+ J) 
70 NEXT : £ 0.60+I :NEXT 
80 RUN 

Tdth Korndl 1082 Bp. Leonardo da Vinci u. 29. fsz. 8. 



SZUBRUTINOK 



Tisztelt szerkesztoseg ! 
A Commodore VC-20 Bas.c-je a C-64-hez hasonlban sajnos 
nem tul j6. fgy ad6dhat olyan eset, amikor olyan utasftasra 
lenne sziiksegunk. melyet a CBM Basic nem ismer vagy m*s- 
keppen ismer. Ilyenkor nehany ugyes baveszmutatv6nnyal 
esetleg lehet eredmenyt elerni, de nem mindig. Ezert kozre- 
adok nehany gepi ko,du szubrutint. amely megkonnyftheti 
a programoz6 munfcajat. A programok alapgepen is. es Mr- 
milyen b6v',tessel kieg*szitett (3 K. 8 K 16 K) gepen ,s haunil- 
hatdk. A betolto program befrasa es lefuttatasa utan a 
szubrutinok a kikapcsolasig bent maradnak. a Basic-et nem 
zavarjak. 



A szubrutinok ismertetSse : 
/. Kiszimitott GOTO utasMs: 

Hivasa: SYS nnnnn.X ahol nnnnn a szubrutin kezddclme 
(a betdltS program mindegyik szubrutinet kilrja, es amely 
kezddcim a b6vftesektol fugg6en mas es mas lehet.) 
A szubrutin mukodese a Basic GOTO utasltasaval megegye- 
zik de X nem csak szamkonstans, hanem tetszdleges nume- 
rikus valtoz6 vagy kifejezes is lehet. Ezenkiviil C-nek nem 
kell egesznek lenni, a program az egesz reszet is veszi. 
(A SPECTRUM petdaul ismer ilyen utasftast.) 

2. Kiirts a kSpernyo tetszdleges heiytre: 

A Commodore gepeken a kepernydn a cursor rnozgat^sa 
programb6l kisse nehezkes es sok helyet is foglal. Az itt ko- 
vetkezd utasltas a kiiras vezerleset leegyszeruslti. 
Hivasa . SYS nnnnn,X,Y.SZS 

Kiirja kepernyore az X,Y koordinataktbl kezdddden SZS-et 

(SZS termeszetesen nem csak string lehet, hanem bdrmi. 

ami a PRINT utasltas utan lehet). 

0 X 21 a vfzszintes koordinata 

0 Y 22 a fuggdleges koordinata 

X es Y pedig tetszSleges kifejezes lehet! 

3. KiszAmftott RESTORE : 

Sajnos a CBM BASIC RESTORE utasitasa a data-mutat6t 
csak a program elejere tudja allltani. A SYS ^nnnnn.X v.szont 
kiszam.'tja X erteket. es ha van ilyen sorszamu sor akkor a 
data-mutat6t ennek elejere allitja (a Spectrum ilyet szmten 
nem ismer!). 

4. RE -NEW: 

A NEW parancsot hatastalanitja ! A program i igy ujra fut- 
tathatb. Hivasa: SYS .nnnnn. Vigyazaf. ha a NEW utan egy 
valtoz6nak erteket adunk, akkor ezt a szubrutint nehaszndl- 
juk! Tehat csakis program „megnyuvasztasa utan nasz- 
nalhat6! . , _ 
Az igazsaghoz tartozik az, hogy a tetszoleges helyre valb ki- 
iras dtletSt Langos Istvan konyveb6l vettem. Ott ez a szub- 
rSln ^rByllt meg, en csak atfrtam VC-20-ra, valammt 
kiegeszitettem a koordinatak vizsgalataval. 
Pinttr Karoly Szekesfehervar, Jaky Jbzsef Szakkozep.skola 
Varjuk tovabbi otleteit. igert szubrutinjait I 



CLR : F0KE 36379^25 
R=PEEK < 55 > +256*PEEK ( 56 > 
8 R*R-118 D*0 

J5 POKE 56, INT(R/256> 
49 POKE 55 , R- 1 NT < R/256 > *25b I ClR 

60 R=PEEK(55'+256*PEEK<56) 

% RERI- fl CrGO^200 5 POKE fl,C : PRINT" ^^M^WMI" ; 7-VflL CTltS 
.'5 H=D+C^HEXT 
30 IF D" 14663 THEN 90 

U POkI 11; nNK^>/256>*256-l CLR : PRINT^OFORT HI3R! 1 

0 PRIMT"3*H SZUBRUTINOK HIVR^I. ^I« CIMEI 3" 

100 PRIHT'IM KISZfrmWrtlTOTT GOTO : 3 M SYo , 

1 05 PR I NTPEEK < 55 > +256*PEEK < 56 ) J2J| ■ II, KT m 
110 PRINT" «a KllWmW TETSZ0:lU«LEGEbrt ^^Si - 
115 PRINTS 3V3";PEEKC55)^56*PEEK(56> + 15.;"H^,V,S^JD" 
120 PRINT"* KlSZRTlt NH1T0TT RESTORE :5W SVS% 
122 PRINTPEEK<55>+256*PEEKC56>+55>"II,X" c ^^ OQ 
125 PRINT" iW RE-NEW ■ BSVS" ; PEEK<55>+^5b*PEtKc36.i+89 
130 GET R* IF R*="" THEN 130 
140 NEW- 
190 END 

200 L*=LEFT$<C$, 1> 
_10 R*=RIGHT$<C*,1> 
220 L*VAL<L$) 

230 IF L=0 AND L$<>"0" THEN L=RSC<L*)-55 
240 R«VALCR») 

'50 IF R=0 RND R*O"0" THEN R=RSC<R$>~55 
2^0 C=16*L+R RETURN 
1000 DRTR 20.FD,CE.20,8R,CP,20,F7 
1010 DRTR D? • 4C j R3 , C8 , t R • 20 / F D > L-E 
1M20 DRTR 20,yE,D7,E0,l6,B0,13,SR 
1030 DRTR 48.20,FD,CE,20,9E>D7/E0 
1040 DRTR 17,B0,0C,63.R8,20,F0>FF 
1050 DRTR ER,20,FD,CE,4C,R0,CR,R2 
1060 DRTR 0E,4C,37,C4,ER,20,FD,CE 
1070 DRTR 20,8R,CD,2O,F7,D7,20,13 

1089 DRTR C6, B0, 05. A2v 11 -4C, 37, C4 

1090 DRTR R5,5F,A4,60,ES«..01>60,01 
1100 DRTR 38.35.41,84,42,60,ER,R0 
1110 DRTR 01,98,31,2B,20,33,C5/R5 
1120 DRTR 22, R4, 23, 18,69,02,90,01 

130 DRTR C8,35,2D.34.2E,20,60,C6 
140 DRTR 4C74.C4.EA 

i'ERDV. 
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Ha progranrrir£si feladatot adunk tisztelt Slvasoink- 
nak, akkor az mindenk^ppen kotelez benniinket arra, 
hogy a beerkezett munkak kozul legalabb egyet, a 
legjobbat vagy legtanulsagosabbat kozoljuk. MI- 
COLOR nyerd p£ly£zatunkban sok iskolai szakkor 
vett reszt, sok jo 6s rossz programot kuldott be. Ez- 
uttal az 1. sz£mu feladatr6l ejtunk n6h£ny szot, s 
kozoljuk az egyik programot is. 
A feladat kiirasa a kovetkezo volt : 



K6szitsunk kaleidoszkopot! Tehat egy grafikai 
programot kSriink, a kovetkez6 megkotesekkel : 
/. A program HT g§pre kSsziiljon BASIC nyelven, 
most g6pi kodu rutinok hasznalata nem enged<§lye- 
zettl 

2. A k6pernyo egyik nyolcadSban (I. az SbrSt!) 
minden allapotban legyen egy v6letlenszeru minta, 
a tobbi nyolcadot ennek tukorkepeivel toltse ki a 
a g6p. 

3. Az ailapotok ne ugy valts£k egymast, hogy elo- 
szor a „vez6rnyolcad" valtozik, utana tobbi, hanem 
sz6p, szimmetrikus modon tort£njen a valtozas. 
Jo szorakozast ! 




A feladatra 40 megoldas erkezett be. Gondot altalaban az 
okozott, hogy a megadott teglalap-nyolcadot tengelyesen 
tukrozgetve nem lehet lefedni a kepernyot. Nehany jellemzo 
kikerulesi mod (ertekessegi sorrendben, eloszor a jobbak) : 

• a haromszoget a kozepso fuggoleges tengely iranyaban 
kicsinyltsuk egyenlo szaruva, tukrozzuk az atfogora, majd 
nyujtsuk vissza a bal oldal fele (a kicsinyites-nyujtast csak 
az x koordinatan kell elvegezni) ! 

• a haromszoget tukrozzuk kozeppontosan atfogoja felezo- 
pontjara ! 

• teglalap helyett hasznaljunk negyzetet vagy kort ! 

• teglalapot hasznaljunk, de csak a kozepen benne foglalt 
negyzetben vegezzunk tengelyes tukrozest az atlora ! 

• stb. 

Szepseghibanak vettuk, ha a program a teljes kepernyot 
haszn£lja, de nem dupla pontokkal (mert az erosen teglalap 
alaku pontok csunyak, sa szimmetriat is rontjak) ; s levontunk 
pontot a lassusagert is. 

Mint kiderult, nem sokan lattak meg kaleidoszkopot, ez kisse 
ranyomta a belyeget a megold£sokra ; igazi kaleidoszkop- 
szeru programot nem kaptunk; altalaban egy Sllapot beallta 
ut£n minden lepesben 1 pont es a 7 tukorkepe valtozott. 
Jobban orultunk volna olyan megoldasoknak, ahol egyszerre 
nagyobb valtozas tortenik, megfelelo sebesseggel peldaul 
a kepernyon felulrol lefele. Ehhez az ertelmezeshez leginkabb 
a Piarista Gimnazium programjaban talaltunk hasonlot, 
most megis a Berzsenyi Daniel Gimnazium programjat ko- 
zoljuk, mert a teglalap alaku kaleidoszkopok kozul az ovek 
volt a legszebb. 

Kaleidoszkdp program - Bp. Berzsenyi Daniel Gimnazium 
3. ha/add szakkor 

A program egy olyan kaleidoszkopot modellez, amelybe ket, 
egymassal 45°-os szoget bezaro tukor van. 
A kaleidoszkdp alakja 3-fele lehet: 

• kor 

• negyzet 

• teglalap (a negyzet ,,elnyujtott" valtozata) 

A program elinditasa ut^n (RUN) a harom valtozat kozul ki- 
valasztjuk a megfelelot (A/B/C). Ezut£n a gep a billentyuzet- 
tol fuggetlenul folytatja a programot (kivetel: BREAK). 

Az egyes programreszek funkcioi : 
110: Kisbetuk hasznalatat engedelyezi. 
140-230: Uzemmod-v^lasztas. 
240-310: a) es b) modban keretrajzol^s. 
320-370: A kep valtoztatasa. 
380-440: c) modhoz kor rajzolasa. 
450-630: b) es c) mddhoz szubrutin. 
640-850: a) m6dhoz grafikai szubrutin. 
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Mult havi cikkiinkre egy azonnali reagalas erkezett. Egy beszamol6. Ta- 
pasztalatatadasra buzditottunk, igy hat tartva szavunkat, maris kozoljiik 
e beszamol6t. 

Az NJSZT Hazikeszitesii Computer Clubon belul mOkodik az APPLE . s"kci6 
is. amelyet Eurdpa egyik legnagyobb komputerklubja. "APPLE USER 
GROUP EUROPE e.V. magyarorszagi regionalis csoportjakent ismerte 
el Az A U.G.E.-nek kb. 5500 bejegyzett tagja van elsdsorban n6- 
met nyelvteriileten. A magyar csoportnak 50 tagja va n •^•Jvbo 1 
30 rendszeresen vesz reszt a klubfoglalkozasokon. Az onallo egyesulet 
regonalis csoportokra es munkacsoportokra oszl.k A regional is c sopor- 
tok rendszeres talalkozot tartanak. amelyeken mmdenki. ak.nek van b6r- 
minemu problemaja, segitseget kaphat .A ^^""kacsoportok xb- 
vekenyseget vegeznek. mint pi. a PASCAL. CP/M. jatek. tava^datatvitel. 
mesterseges intelligencia. isfcolai adminisztrac.6, POtprocew^ 
baziskezeles. konyvtar kezelese es irodalom. hogy csak a legfontosabbakat. 
emlitsem a tobb mint hiisz munkacsoportb6l. A magyarorszagi regional. s 
csoport - most mar hagyomanykent - szervezi nyaranta a nemzetkoz. 
APPLE-tabort. amelyre kethetes idfitartamra - els5sorban Nyugat-Eur6pa- 
bol - varunk vendegeket. Az eddig Miskolcon. Szentendr6n 6s Budapesten 
rendezett taborokon voltak vendegek NSZK-bol. Ausztr.ab6l. Olaszorszag- 
b6l. Hollandiab6l es termeszetesen Magyarorszagr6l. 

A taborokon szeminariumokat tartunk a fenti munkakozossegi t6m6kban. 
A legnepesebb szekcio mindig a PASCAL. ugvhogY a taborok a'^lmaval 
tobb PASCAL-szekciot is kellett alakitani: PASCAL kezddknek. PASCAL 
angol nyelven es PASCAL haladoknak. ahol a haladok mind.g workshop 
formaban dolgoztak ki egy nagyobb programrendsiert. ^ amely W£6bh 
klubszoftverkent kerul terjesztesre a klubtagok kozott TovAbbi szekc.ok 
voltak BASIC kezddknek. 6502-es es 68000-es ASSEMBLER. CP/M es 
dBASE. valamint hardver. A szeminariumokat mindig olyan szakmailag 
elismert egyenisegek vezetik. akik az A.U.G.E.-n belul es ezen kivul is mar 
nevet szereztek. Ok eddig egy kivetellel Nyugat-Eur6pab6l jottek. 

A szeminariumvezetok es a hallgatok is magukkal hozzak sajat APPLE sza- 
mit6gepuket. Ennek behozatala es visszavitele eddig - egy eset kivetelevel 
- nem okozott gondot a vamhatdsagoknak, mivel az NJSZT titkarsag olyan 
kezesseget vallalo levelet kuldott minden resztvevdnek. mely alapjan a be- 
rendezesek vamkezelese megtortent. 

A szemtnariumvezetdk nem fizetnek reszveteli dijat. mivel ezt a szemina- 
riumokon resztvevSk fizetik ki. 

De ha mar ide jottek a vendegek Magyarorszagra, termeszetesen muta- 
tunk is valamit hazankb6l. Igy kirandulasokat szerveztunk legszebb tSjaink- 
ra. igy Egerbe, Visegradra, Szentendrere, Hortobagyra. Holl6kdre. Pecsre 
es Budapestre. 

A resztvevdk altalaban azzal bucsuznak. hogy ,.J6v6re ujbdl jovunk!'. Ezt 
alatamasztja az resztvevdk en.elkedo szama is. J6v6re augusztus masodik 
feleben szeretnenk a tabort Veszpremben vagy kbrnyeken rendezm. Az . el6- 
zetes program szerint ismet harom PASCAL-szekcio. ASSEMBLER es 
CP/M szekcio lesz. Ojdonsag lesz a LISP, mint a mesterseges intelligencia 
egyik nyelve. 

Eddig mindig a megfeleld helyszin kivalasztasa jelentett problemat. hisz 
ilyen jellegu tabort csak szep kornyezetben fekvd. megfelelo felszereltsegu 
udiildben lehet rendezni. ahol az altalanos napi etkeztetest es a szemina- 
riumok lebonyolitasat is lehet biztositani. 

A legnagyobb nyereseg viszont a kolcsonos megismerkedes, segitseg es 
a szamitastechnikai ismeretek gyarapitasa. Itt amatdrdk segltettek amatd- 
rbknek. es emellett mindenki jol erezte magat. 

A HCC APPLE szekcioja egyebkent minden h6 elso es harmadik keddjen 
talalkozik az NJSZT termeiben IBp V.. Bathori u. 16 ). Az els6 kedden min- 
dig beszeliink az APPLE ujdonsagair6l. a klub bels6 eleterdl es bemutatunk 
uj programokat. A harmadik kedden szeminariumi jelleggel beszeliink alta- 
lanos erdeklodesre szamot tarto temakrdl. 



Diebel Dietrich, a HCC APPLE szekcidjanak vezetfije 



REM ft******************** 

20 RSM * KALEIDOSZKOP * 
3% RSM t BERZSSNYI D. GIMN. * 
49 RSM * 3. HAL ADO SZAKKOR * 

Z% RSM <HHr*W»*HHr«»i» H ttii» 

196 DSFINT A-S.U-Z 
il0 POKE 16414,7i:POKE 16415,4? 
129 RANDOM .-RANDOM :RAND0M 
139 CLS 

149 PRINT "KALEIDOSZKOP 

159 PRINT 

160 PRINT "MIL YEN GRAFIKAT HASZNALJON 
A PROGRAM?* 

179 PRINT 

189 PRINT "a) 61x45" 

199 PRINT "b) 45x45" 

299 PRINT "c) 22 SUGARU KOR" 

219 IF INKEY$<>"" THEN 219 

229 A$=INKSY$ 

239 IF A*a"A u THEN GR*1 ELSE 

IF A$**B" TH2N GR*2 ELSE 

IF At*'^ THEN GR*3:G0T0 389 

ELSE 229 
249 IF GR«2 THEN A*9:B«55 ELSE 

A«t:B»63 

259 as 

269 FOR I*A TO B 

279 SETa#9):SeT<M6) 

289 NEXT I 

299 FOR I«9 TO 46 

309 SET<AJ):SBT(BJ> 

319 NEXT I 

329 X»RND<45)-23 

339 Y»RND<45)-23 

349 ON GR GOSUB 649,459,369 

359 GOTO 329 

369 IF X*X+Y*Y>484 THEN RETURN 
379 GOTO 459 

389 T«9:T9*.92 

390 CLS 

409 X*INT(46*T/(l^T*T)*^):Y*INT(23#(l-T*T)/(l+T*T)+.5) 

419 T«(T+T9)/(1-T#T9) 

420 GOSUB 460 

430 IF T<*.42 THEN 400 
440 GOTO 320 

450 IF POINT<32+X,23*Y) THEN 550 

46$ SET(32+X,23+Y> 

470 SET(32+X,23-Y) 

480 SST(32-Xi23*Y) 

490 SET<32-X,23-Y) 

500 SET(32+Y,23+X) 

5i0SET(32+Y,23-X) 

520 SET(32-Y,23+X) 

530 SET<32-Y^3-X) 

540 RETURN 

550 RESET(32tX,23+Y> 

560 RESET(32+X,23-Y) 

570 RESET(32-X,23+Y) 

589 RESET(32-X,23-Y) 

599 RESET(32+Y,23+X) 

690 RESET(32-»-Y,23-X) 

619 RESET(32-Y,23+X> 

629 RBSET(32-Y,23-X) 

639 RETURN 

649 X»ABS(X):Y=ABS(Y) 

659 N=0 

669 GOSUB 689 

679 Z*X:X«Y:Y*Z 

689 Z*INT0C/3):M«X-3*Z 

690 IF M*2 THEN M*3 

799 X1=4*Z+M 

719 GOSUB 739 

720 IF MM THEN Xl»Xl + i ELSE RETURN 
730 N»N+1 

740 IF N*l THEN PP«P0INT(X1,Y) 

750 IF PP THEN 810 

760 SET(32+X1,23+Y) 

770 SET(32*Xit23-Y) 

780 SET(32-X1,23^Y) 

790 SET(32-X1,23-Y) 

800 RETURN 

810 RESET<32+X1,23+Y> 
829 RESST(32+X1,23-Y) 
839 RESET(32-Xi,23+Y) 
848 RESET(32-Xi,23-Y) 
858 RETURN 




Ajinlis: 

Amikor kezembe vettem a cikkei kicsit bosz- 
szus voltam: matemattkus bcse'mnek megmt 
..elsult" az agya, pedig in egy szdrakoztatd 
programot kdrtem a Bit-let sza'ma'ra. De aztAn 
amikor ma'sodszor is kihult a vacsora. men 
kdptelen voltam feldllni a g6p el6l, ugy don- 
tbttem. mdgiscsak jd lesz ez. (Ehhez hozza'- 
tartozik. hogy sza'm/tbge'pes ja'te'kkal eddig 
meg W brdndl tbbbetnem sikerult eltbltenem.) 
Teh it senki ne riadjon vissza a definicibktbl. 

Luk&cs Jdzsef 

Vagjunk rogton a kozep6be. lassuk a defini- 
ci6kat. 

Tekintsunk egy valamilyen jelk6szlet (pi. 
ASCII k6d) elemeibdl alio veges hosszu 
sorozatot. Ezt nevezzuk szbnak. Ha e sz6 
elej6r<5l 6s/vagy v6g6r6l elhagyunk tetszflle- 
ges jeleket. akkor egy uj sz6t kapunk (esetleg 
ures sz6t). Az uj sz6 az el<5z6nek r£szszava 
lesz. Ha egy reszsz6t egy masik jelsorozattal 
helyettesftunk, akkor ism6t egy uj sz6t ka- 
punk. PI. a GIZIKE sz6 IZI reszszavanak OZE 
helyettesft6s6vel uj sz6t kapunk: GOZfrKE. 
Itt IZI - OZE a helyettesite'si szabaly. 

Most tekintsunk n darab helyettesi'tesi sza- 
balyt meghatarozott sorrendben: 

Xi — -Vi X 2 - Y 2 . X, - Y n 

Alkalmazzuk a szabalyokat az alabbiak 
szermt 1 

Vegyunk egy sz6t - ez lesz az Inputszb. Pr6- 
baljuk meg ezen a sz6n alkalmazni az els<5 
helyettesitesi szabalyt. Ha nem sikerul 
(X, nem r6sze az Inputnak), akkor vegyuk 
a masodik szabalyt. 6s (gy tovabb. Ha alkal- 
mazhat6 a szabaly. akkor vegezzuk el a he- 
Iyetteslt6st. 6s az uj sz6val kezdjuk elolr<5l az 
eg6szet. Tovabbi kikot6s. hogy ha egy sza- 
baly alkalmazhatb. akkor X r6szszo balr6l 
els<5 elfifordulasat kell helyettesiteni Y-nal. 



Ha mar egyik szabaly sem alkalmazhato. ak- 
kor alljunk meg. Az utols6 sz6 a vegered- 
meny. az Outputszb. 

Erdemes felhfvni a figyelmet. hogy a szabalyok 
sorrendje nagyon I6nyeges. valammt hogy 
a szabalyok jobb 6s bal oldala nem feltetlenul 
egyenl<5 hosszu. A jobb oldal lehet akar ures 
it! 

Term6szetesen elGfordulhat. hogy sohasem 
tudunk leallni. Ekkor a szavak vegtelen soro- 
zata keletkezik. 

Osszefoglalva egy olyan eljarashoz jutottunk. 
aminek van egy bemenete, es szolgaltat egy 
kimenetet. vagy vegtelen sorozatba kezd - 
elszall. 

Tulajdonk6ppen a szokvanyos szamft6gepek 
ugyanezt csinaljak. csak mas formSban van 
megadva az algoritmus, vagyis a program. 
Bizonyfthat6. hogy minden olyan leladatra. 
ami mas szamlt6g6peken megoldhat6. lehet 
az elGbbiek szerinti . programot" irni. 6s meg- 
fordftva. A program itt persze felcser6l6si 
szabalyok adott sorrendu 6sszess6ge. 

Az itt lei'rtakat el6szor A. A. Markov definialta. 
(gy r6la Markov-algoritmusnak nevezt6k el. 

Az eddigiek alapjan talan m6g nem vilagos. 
hogy a val6sagban hogyan is lehet egy 
Markov-f6le elven mukod6 sz£mft6g6pre 
programot k6szfteni. Ennek meg6rt6s6re leg- 
egyszerubb, ha megtekmtunk n6hany minta- 
programot. Az Input elej6t 6s v6g6t mindig 
# jelzi. Els6 p6ldank 0 1 6s 2 karakterekbfll 
all6 tetsz<3leges jelsorozatokat rendez sorba 
ugy. hogy elol alljanak a nullak. utana az 
egyesek. majd a kettesek. 

A program fgy n6z ki. 

1. 10-01 

2. 20- 02 

3. 21-12 



A program futasanak menete 101210 Input- 
sz6 eset6n: 

1. #011210* 1. #011201 # 2 #011021 # 

1. #010121 # 1. #001121 # 3. #001 112* 

El<5sz6r az 1. szabalyt alkalmazzuk a sz6 ele- 
j6n. majd ujra 1 -et a sor v6g6n. A kovetkez<5 
korben az 1 . nem alkalmazhat6 . viszont a 2 
igen- a negyedik pozici6ban. Az igy kelet- 
kezett sz6ban ism6t l.-et lehet alkalmazni. 
Az otodik I6p6sben megint 1.. hatodszorra 
pedig sem 1. sem 2. hanem csak 3. mukodik. 
A hetedik pr6balkozasra mar egyik szabaly 
sem mukodik az Outputsz6 tehat 001 1 1 2 - a 
szamok rendezve vannak. 

Ha itt a szabalyokat felcser6ljuk. a v6gered- 
m6ny nem valtozik meg. viszont a rendez6st 
mas sorrendben v6gzi el a g6p. 6rdemes kipr6- 
balni! 

A masodik p6lda Inputja tetszfllegesen sok 
..!". A program megszamolja (tfzes szam- 
rendszerben). hany ! van az Inputban. 



1. 


0 




1 


2. 


1 
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3. 


2 
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4. 


3 
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5. 


4 
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6. 


5 
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7. 


6 
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8. 


7 
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9. 


8 
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10. 


9 




:0 


11. 


• 




#1 


12. 
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:/ 


13. 


# 


j 


#1 



Ebben a programban az utasitsok nagy r6sze 
1-11-ig a szamolas menet6t defimalja. mlg 
a 12 egy ujabb !-et szuntet meg ugy. hogy 
egyben elmdit egy szamolast. v6gul a 13 
mdftja el az eg6sz folyamatot. A program 
futasa a mel!6kelt sz^mft6g6pes modellben 
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egyszeruen kovethet<5. Azt viszont erdemes 
megfigyelni. hogy az ujonan bevezetett 
jeleknek ( : 6s / de lehetne mas is) kulon 
jelentesuk van. A / valasztja el a felkialt6- 
jeleket a szamlal6t6l. a : pedig azt jelenti. hogy 
az el6tte all6 szamot novelni kell. A novelest 
mint muveletet itt kulon definialni kellett, mert 
a Markov-automata csak karakterekkel dol- 
gozik, nem tudja. hogy vannak szamok. es 
azoknak sorrendje. Ilyen ertelemben a 1-10 
utasitasokat felfoghatjuk a tizes szamrendszer 
definlcitijakent is ! 

Egyebkent itt mar az utasftasok nem mind 
cser6lhet(5k fel. Peldaul a 12 nem kerulhet 
el6bbre. viszont a 13 barhol \6 lenne. es 
1-11 is tetsz<5leges sorrendben allhat. 
M6g egy pelda. ahol mar csak a programot 
kozoljuk. Egy szoveg szavait kulonvalogatja 
ugy. hogy a folosleges betukozoket kihagyja. 
es a szavakat / valasztja el. 

1. 

2. U # - 

3. /I— 1/ 

4. ■* / 

Ezen kfvul persze meg sok mmdent szelleme- 
sen meg lehet oldani Markov-programokkal. 
Nehany problema. amit megoldasra javaso- 
lunk. 

binaris osszead6 Inputja pi. 1101001+1010 
binarisb6l decimalisba oda-vissza fordtt6 
BCD osszeadb. szorz6 stb. 
es meg ami kinek-kinek eszebe jut. 



Persze bonyolultabb programok frasahoz 
6rdemes az algoritmus defim'ci6jat kiterjesz- 
teni. PI. egy jolly-joker (legyen a jele#) 
bevezetese igen hasznos lenne. Ezt ugy kell 
e>teni. hogy a helyettesi't^si szabalyban a* 
barmilyen karaktert jelenthet. Az algoritmus 
tovabbi b6vft6s6nek lehet<5segeit, es azoknak 
az interpreter programba val6 beilleszteset 
szinten az olvasbra bfzzuk! 



Az interpreter 

AMarkov-programok megirasahoz es lefutta- 
tasahoz j6 segedeszkoz a cikk mellett lekozolt 
Basic program, ami egy Markov-fele szamlt6- 
gepet modellez. A program eredetileg 
HOMELAB 3 gepre keszult de konnyen at- 
frhatb mas tfpusra is. 

A$(l) 6s B$(l) az l-edik szabaly bal es jobb 
oldalat tarolja. a 8$ pedig az Inputsz6. ill. 
a bel6le szarmaz6 mtidositasok. 
A programban 10-90-ig tortenik a menu le- 
kezelese. 1 20— 220-ig a programok szer- 
kesztfije - vagyis a Markov interpreter editorja 
talalhat6. (120-160 listazza a programot. 
1 70-220 pedig uj sort vesz be.) 
300-t6l a program futtatdja kovetkezik. 
EI6sz6r az Inputsz6t veszi be. majd 320-350 
megkeresi a legel<5szor alkalmazhat6 sza- 
balyt. 360-370 vegrehajtja a helyettesitest. es 
kifrja a gep aktualis allapotat. fgy menet koz- 
ben kovethettf. hogy mi tortenik. 380-400 
a billentyuzet figyelese. Itt meg lehet allitam 



a futtatast. vagy vissza lehet term. 500 a veg- 
eredm^nyt irja ki. 

A program a korabban mondottakkal egyez6s- 
ben az mputsz6 ele es moge egy-egy #-et 
tesz. 

A Markov-programok futtatasa kozben senki 
ne lepGdjon meg a sebess^gen: egy-egy 
szabaly kitalalasa 1-10 masodpercig is el- 
tarthat. hiszen alland6an a kuldnben is lassu 
Basic leglassubb rSszet, a sztringmuveleteket 
hasznaljuk. Gepi nyelven ez nyilvan sokkal 
gyorsabb lenne, de a mai szamft6gepekben 
sajnos igy sem lenne igazan hatekony ez az 
algoritmus. Alkalmas hardverrel viszont igen 
egyszeruen programozhato gepet lehetne 
k6szftftnt. Hatekonysagat az is novelhetne. 
hogy az egymastbl fuggetlen szabalyokat 
egyszerre is lehetne tesztelni. fgy a parhuza- 
mos mukodest is meg lehetne oldani. 
Az is nyilvanval6. hogy ez a nyelv vegul is 
nem alkalmas hosszadalmas aritmetikai mu- 
veletek elvegzes^re. vagy folyamatszaba lyo- 
zasra. Ellenben szovegszerkesztesre. adat- 
kezel6sre. szmtaktikai elemzesre. szdvegek 
k6dolasara kival6an alkalmas lehetne. hiszen 
programjai tulajdonkeppen nem masok. mint 
az adott feladat pontos es szigoru defimc<6i. 
Ezert ha a napi gyakorlatban ma meg koz- 
vetlenul nem is hasznalhat6 - mindenkinek 
epulesere szolgal megismerkedm egy mas 
elvu gondolkodasm6ddal. 

Luk&cs End re 



then 
then 



Goto 
Goto 



120 
300 



If A*="l 
If A*«s 4, 2 
Goto 40 

Print chr*<12): For V=l to 50 

If A$<V>=" n then Pop : Goto 170 

Print cur 32*int (V/26) ,V-25*(V>25> ; rgh* ( str^ < V) ,2) u . »\ 

Print A*<V) n — > M B*(V) 

Next 

Input cur 0,26"A parancs sorszAma: H A* 
If A** t#M then Goto 20 
V=val(A*>: If V>50 then Goto 20 
Print s Input "Az elsG sz6: M A#(V) 
If A*(V)= nn then Goto 120 

Print : Input n A mAsodik sz6: M B$ ( V) : Goto 120 
Print chr$<12>: Input cur 0,5"Az input bz6: "B$ 
B$=: u # ,, •^-B$-t- ,, # l, : Print cur p,10"Az aktuAlis sz6: M 
Print cur 0,15 n Az aktuAlis parancs:" 

For V=l to 50: A=len (A*(V) ) : If A=0 then Pop : Goto 500 
For X=l to len<B*)+l-A 

If mid^ (B^, X , A) ==A* (V) then Goto 360' Next 
Next : Goto 500 

Print cur 0,11;B4>,, cur 0,16;A*<V)" ~> "B*<V) f 
Pop : B*=l f t* < B$ , X- 1 ) +B* < V ) +mid* ( B* , X+A f L) 
A$=Inkey*: If A*= n " then Goto 

Pop 



If AS^'S" then 



o20 
: Goto 



30 



400 If A$= M " then Goto 320 Goto 390 

500 Print cur 0,20; "Az output szd>:": Print B* 

520 Goto 30 



Ok 



P6csi olvasdnk. Kiss Tibor /rasa regebben erkezett szerkesztdsegunkte 
Olyan temanak sok agat-bogat igyekszik osszegezni, amely bennunket is 
izgat : hoi, mikor. mire 6s midrt hasznaljak, vagy e'ppense'ggel az istennek 
sem hasznaljak a szamitog&pet. Melyik va/lalatot mi/yen meggondolasok 
vezeti. amikor gepet vesznek a ce'gne'l. vagy leszavazzak a g&pvasarfast ? 
Kiss Tibor IrAsat gondolatebresztdnek is szanjuk; k/vancs/ak vagyunk. 
mit gondolnak ugyanerrdl olvasoink. 

Szidjak a szamitbgepeket. A kezdeti, feltetel nelkiili lelkesedes mar alabb- 
hagyott, es az abrandkepeket felvaltotta a rideg va!6sag. Ahol nem volt 
megfelelden megalapozott a szamitbgepek alkalmaz£sa, ott sokszor azo- 
kat okoljak a sikertelensegert. A tanulopenzt azonban mindenhol meg 
kell fizetni, es ki tobbet, ki kevesebbet fizet. 

A szemelyi szamitogepekkel egy fejlett technologist kepviselo eszkoz 
keriilt a vallalatok kezebe, amely a fejlett orszagok vallalatainal mar 
komoly sikereket ert el. Azonban a szocialista vallalat mas kozeg a szamit6- 
gep szamara; az alkalmazas lehetosegeit itt kiilon meg kell vizsgalni. 
A bevezetes feltetele idealis esetben, hogy a haszon nagyobb legyen a 
raforditasnal. Ez az arbevetel-koltseg o!dalar6l, de egyeb oldalr6l is mer- 
legelendd, mint pi. munkafeltetelek, az eredmenyek pontossaga, az in- 
formaci6k gyorsasaga, tehat amely t^nyezok csak kozvetetten fejezhetok 
ki penzben. 

A vallalatoknal azonban nem mindig ilyen idealis a helyzet. Egyik ilyen 
eset: a szarmtogepeken rendkivul bonyolult feladatokat is meg lehet 
oldani gyorsan, es ez sok ember munkajat teheti foloslegesse. Ez bizto- 
san kifizetodo a vallalat szamara, amennyiben az arbevetel-koltseg oldal- 
rdl n6zziik a dolgot. Azonban lehet, hogy egyeb okok miatt szuksege van 
a v^llalatnak a letsz^mra. pi. be>szinvonal, munkaero-tartal^k, szocial- 
politikai okok miatt, s igy nem erdeke a letsz^mmegtakan'tas. Talalhat6k 
meg mas, a tiszta gazdasagi logikatbl eltero megfontolasok, amelyek azt 
mondjak, hogy megsem kell a sz^mitdgep. 

Amennyiben indokolt az alkalmazasa, ugy ennek a lehetoseget is meg kell 
teremteni, tehSt letre kell hozni a szemelyi szamitdgepek alkalmazasanak 
kozvetlen felteteleit. Ezek a szamit6g6pet felhasznalbkra, magara a gepre 
es az alkalmazas helye>e vonatkoznak, valamint ennek a harom tenyezo- 
nek egyiittes megval6sul^sara, amely meghatarozza az alkalmazas hat6- 
konysag^t. 

Szukseges a megfelelo szamu szakember biztositasa a gepek kezelesere, 
az alkalmazas lehetosegeinek ismertetesere, es legal^bb ennyire fontos, 
hogy a vallalat dolgozoi is lassak a szamitbgep illeszkedeset a vallalati 
tevekenys^grendszerbe. Amennyiben kisebb, pi. Commodore 64 nagysag- 
rendu geprol van sz6, akkor lehetoseg szerint biztositani kell, hogy min- 
den erdeklodo hozzaferjen a gephez tanulmanyozni, megismerni es fel- 
hasznalni azt sajat munkajaban. Ezzel ugyanis sokkal jobban biztosithato 
a befogado kozeg azonosul£sa a feladattal, lekuzdheto az esetleges ide- 
genkedes ettol az ismeretlen, nehol misztifikalt eszkoztol. 
A szemelyi sz£mft6gepek sok tipusa ismeretes. Ezek osztalyozhatok bizo- 
nyos parameterek szerint, mint pi. kapacitas, muveleti sebesseg, a csatla- 
koztathat6 tarol6k, nyomtat6k megbizhat6saga stb. Igy viszonylag egy- 
ertelmuen hozzarendelhetok a megfelelo gepek a megfelelo feladatok- 
hoz. 

Az alkalmazas helyet mindig a f unkcio, a munkafolyamat jellege hatarozza 
meg, amennyiben ez technikailag megvalosithato. Alapveto szempont, 
hogy azon a teriileten kell iizemeltetni oket, ahol a vallalat szamara 
- valamilyen meggondolasbol - esszeruek. Ilyen lehet a szamitasok, 
adatok pontossaga es gyorsasaga. PI. iizleti targyalasoknal igen I6nyeges, 
hogy egy iizlet milyen n /eresegesseget iger. A hatarido munkakn£l is 
fontos lehet, pi. valamelyik idoszak vegen, amikor a reszadatok egyszerre 
erkeznek be, es a vegeredmeny is lehetoleg azonnal kellene. Az unalmas, 
monoton szamit^sokat gepesitve emberibb munkafelt^teleket teremt- 
hetiink. 

A harom kozvetlen feltetel meglete azonban meg csak latszatharmonia, 
mivel a gepek hatekonys^ga igen nagy me>t6kben fiigg attbl, hogyan 
otvozik ossze a h^rom t6nyezot, hogyan illesztik bele a vallalati folyama- 
tok rendszerebe. 

Rendkivul lenyeges a megfelelo elokeszites. Amennyiben elegendo penz 
all a vallalat rendelkezesere, ugy az elso feltetel mar megoldottnak 
tekintheto. A harmadik feltetel, az alkalmazas helye hatarozza meg. 
hogy milyen gepet erdemes vasarolni, Igy ezt bizzuk szakertore. Ha 
nines a vallalatnal, akkor kulso segitseget kell igenybe venni. Ez meg 
mindig sokkal gazdasAgosabb, mint az elhibazott gepvas^rlas. 
A gep ismerete utan a tobbi elokeszito munkat a vallalat onalloan is 
meg tudja oldani. A klvant feladatok vegrehajtasahoz szukseges progra- 



moknak milyenek az inputadat-igenyeik, valamint az output- 
adatok milyen csatornakon keresztul kerulnek el az azokat 
felhasznalbkhoz. Az ebben a rendszerben felmeruld prob- 
lemakra (pi. bizonyos helyeken nines olyan munkaero, ame- 
lyik az uj feladat vegrehajtasara kepes lenne) a gepvasarlas 
elott kell megoldast talalni. 

Az elokeszitest akkor tekinthetjiik befejezettnek, ha latjuk 
az egesz jovobeni folyamat strukturajat, az adatok keletke- 
zeset, geprevitelet, az outputadatok tovabbitasat es fel- 
hasznalasat. Ezutan tudjuk csak megltelni, hogy mennyi 
hasznot hozhat a szamit6gep, tobbletjovedelem vagy kolt- 
segesokkentes formajaban. 

Ezutan kovetkezhet a kozvetlen megvalositas. Mivel tobb 
intezmeny. tarsulas is foglalkozik gepek eladasaval. tanfolya- 
mokkal, programkeszitessel, ezert a vallalat szamara leg- 
elon/osebb vetel erdekeben eldzetesen tajekozodni kell az 
osszes lehetosegrol. 

A gepvasarlas utan ugyancsak tajekozodni kell a szoftver- 
arakrol, tehat hasonlo votumenu feladatok elvegzeset altala- 
ban mennyie>t 6s mennyi id6 alatt vegzik el. Kell tudni azt 
is, hogy az adott feladatok elvegzesehez szukseges gep- es 
programozasi ismeret mennyi ido alatt sajatithato el. Ezek 
igen fontos tenyezok, mivel nem biztositja semmi azt. hogy 
aka> allami intezmSnyek, akar magantarsulasok ne kerjenek 
tobbszoros 6rat. vagy ne adjanak harom-n6gyszeres tan- 
folyamidot. 

Azok, akik majd a program output adatait fogjak hasznalni, 
tudjak, hogy milyen adatok, inform^cidk kellenek a munki- 
jukhoz. Ez a minimumszint, innen indul el a programkeszit6s. 
Az osszes inputadat 6sszegyGjt6se utan tisztazodnak, hogy 
milyen tobbletinformaci6k nyerhet6k meg kiilondsebb ra- 
forditas nelkiil. 

Ezutan lehet veglegesiteni az outputlistak tartalm^t es for- 
majat. Ez mar elvileg vegleges formanak szamft, mivel a 
programozo ezen nem valtoztat. Amennyiben rossz volt az 
eldkeszites, ugy konnyen elofordulhat, hogy rossz lesz a 
kesobb alland6an rendelkezesre alio informacio is. Ha pedig 
a felhasznalo vegiil az iroasztalf iok lesz, ugy kiilonosebb 
ertelme nines a gepnek. 

Vannak lenyeges szemelyi feltetelek is. Kell, hogy legyen 
egy ember a vallalatnal, aki atlatja az egesz folyamatot, an- 
nak szervezeti 6s szemelyi vonatkozasait is. El kell erni, hogy 
az osszes erintett szemely ertse azt: milyen valtozas lesz a 
gep uzembe allitasa utdn a munkakorukben, illetve abban a 
valialati folyamatban, amelyben kozremOkodnek. Ehhez 
elobb meg kell ismertetni mindenkit - legalabb altalanossa- 
gokban - a szamitbgeppel. Erre - a kozvetlen hozzaferes biz- 
tositasan kfvul - alkalmasak meg a gepkezelesi, programozasi 
tanfolyamok; ahol az eredm^nytelen, ott a kozvetlen munka- 
tarsak segitseget kell ig6nybe venni. (Ezek term6szetesen 
az anyagi osztonzes mellett, nem helyett alkalmazandok.) 
Nem veletlenul fogalmaztam az elozoekben ilyen altalano- 
san. A szemelyi szamit6gepek felhasznalasanak lehetosegei 
ugyanis szinte korlatlanok. A mQkddesuk, munkamodszeruk 
lenyeget kell ahhoz megertenunk, hogy megtalaljuk a valla- 
latoknal, int6zmenyeknel azokat a teriileteket, ahova ezt a 
fajta feladat megold6 keszseget eppen be lehet illeszteni. 
Honnan lehet ezt mege>teni? 

Egyik legkezenfekvobb m6dja az, ha kiindulunk a nyugaton 
elterjedtnek mondhato, s mar hazankban is terjedd program- 
csomagokbbl. Ezek ilyen mertekQ elterjed6se ugyanis csak 
annak koszonhet6, hogy igen j6l felhasznalhat6k a valialati 
gyakorlatban. 

Harom I6nyeges fejleszt6si terulet figyelheto meg. Az egyik 
az, amikor a velt vagy t6nyleges valtoz^sok hatasat a sz^imitb- 
gep pillanatok alatt kiszamolja. Gondoljunk itt pi. arkalkula- 
cibra, ahol egy alapanyag-arvaltozas hatasanak vegigvezetese 
az azt felhasznalo termekek araban csak percek kerdese. 
Fontos segedeszkoz lehet pi. a valialati vezetes szamara a 
tervezes folyaman; esetleges rossz donteseket lehet kony- 
nyen megeldzni. (L. pi.: Elektronikus feladatlap VU-CALC 
ZX Spectrumra. Mikroszamftogepes -Magazirv 1981/2. 21- 
22. old. M6cz6 Jozsef .) 

A masik az, hogy az adatok tomegebol tudja kiemelni a le- 
nyegesnek tartott elemeket, tendenciakat. (gy sokkal ert- 
hetobbe valnak az azt felhasznalok szamara. (L. pi.: Uzleti 
grafika. Mikroszamitbgepes Magazin 1984/5. 16. old. Si- 
mon Ivan.) 

A harmadik az adattarolas, nyilvantartas terulete, beleertve 
a kulonbozo lev^lformak, ugyiratok tarolasat. (Kulonbozo 
szovegszerkeszto programok, file-kezelo rendszerek; I. pi. 
Magyar Szovegszerkesztes a Spectrumon. Otlet, 1984. de- 
cember 20. SzekfQ Andras.) 

Termeszetesen a harom reszt lehet egymassal kombinalni 
is, hogy vegul az alkalmazasnak megfeleld szoftver rendelke- 

O 



zesre alljon. (L. pi.: Szemelyi szarmtogep a kozgazdasagi 
munkaban. Mikroszamft6g6pes Magazin, 1984/5. 26. old. 
dr. Bodis Beta.) 

Vegiil ki kell hangsulyozni, hogy ami megvan a fejekben, azt 
ra lehet tenni szamitogepre, de ami nines, annak megoldasat 
nem lehet varni a szamitogeptol 




A kovetkezo gepi kodu programmal a ZX-81 k6p- 
ernyo pillanatnyi tartalm^t lehet negativba valtani. 
(Azaz a normal karakterek hely6be a grafikus meg- 
felelojuk kerul 6s viszont.) Termeszetesen a kes6b- 
biekben kiir^sra keriilo iizenetekre nines hatassal. 
A program a memori£ban b^rhol elhelyezheto. 
A POKE-ol^shoz szukseges byte-okat (decimalisan) 
a tabl^zat jobb oldala tartalmazza: 



CIKL, 



LD 


HL, (400CH) 


42 


12 


LD 


B.18H 


6 


24 


INC 


HL 


35 




LD 


A.(HL) 


126 




CP 


76H 


254 


118 


JR 


Z.SORVEG 


40 


5 


ADD 


A.80H 


198 


128 


LD 


(HL).A 


119 




JR 


CIKL 


24 


245 


DJNZ 


CIKL 


16 


243 


RET 




201 





SORVEG, 



Bakos Sandor 6900 Mako, Kalvin u. 36. 
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System kulso magnetofonhoz HT 1080Z 

Val6szmu - nem csak nekiink, hanem - sok m6s HT felhasz- 
n6l6nak is r6gi v6gya. hogy g6pi k6du programokat tudjon 
beolvasni kuls6 magnetofonr6l. 

Mint ismeretes. az interpreter csak Basic programok betol- 
t6set teszi Iehet6ve (CLOAD = -2, "nev"), g6pi k6dut nem. 
fgy tobb kazettan I6v6 programunk v6lt a hosszas hasznalat 
sor6n (vagy a masikgepen k6szitett felv6tel miatt) betolthe- 
tetlenne. Kornyezetunkben van aki a kulso magnetofon ilyen 
illesztes6t hardver uton pr6b6lta megoldani - tobb-keve- 
sebb sikerrel - de ezt az 6ramk6r6kh6z kev6sb6 6rt6knek 
javasolni nem merjuk. 

Ettol mi j6val egyszerubb. es a gep atalaki't6s6t egy6ltal6n 
nem ig6nyl6 m6dszert aj6nlunk: 

Ha DISASSEMBLERREL visszafejtjuk az interpreted, a 
02B2H cfmt6l kezdve (ez a SYSTEM parancs be!6p6si 
pontia). meg6llapithatjuk, hogy a *? ut6n figyelmen kivul 
hagyja magnetofon-kijelol6si sz^ndekunkat. 6s automatiku- 
san a bels6t inditja el. (A g6pi k6d visszafejt6se igen bonyo- 
lult, ezzel r6szleteiben most nem is foglalkozunk.) 

A beolvascis megoldhat6 egy rovid programmaL amit a leg- 
praktikusabban a monitorral (rhatunk be olyan teruletre, 
amit a gep valoszmuleg majd nem haszn6l a rutin inditasaig. 
Mivel a program maximum 20 - azaz husz - byte (de lehet 
ottel kevesebb is), ez nagyon konnyen megteheto. 

Az Sltalunk valasztott mem6naterulet a 6300H cfmtol kezd6- 
dik. (De lehet tetszoleges m£sik hely is.) Ide kell beirni 
a kovetkezo byte-okat: 

21. 09. 63. 31. AO, 7F. C3. CE, 02, 3A, 
23. CE. 32, 2C, 00, 00, 00, 00. 00, 00. 

Az utols6 hat darab 00 hely6re irhatjuk a beolvasando prog- 
ram nevenek megfelelo ASCII -k6dokat. Nem fontos mind 
a hatot, hanem - amint a SYSTEM parancsnSI megszoktuk 
eleg annak az els6 neh6ny karakter6t, 6s m6g egy darab 
00-t. 

Ha nem ismerjuk a program nevet, vagy ugyis a kazettan 
soron levot akarjuk beirni, akkor eleg az els<5 00-t beirnunk. 
Miut6n ezzel elk6szultunk, csatlakoztassunk kulso magne- 
tofont - a g6ppel kapott zsin6r segfts6g6vel - a ,,TAPE 
RECORDER" bemenethez (a magnetofonba a fekete 6s kek 
vezeteket kell illeszteni). Ha elfizoleg lenyomtuk volna, 
akkor engedjuk fel az F1 gombot. 6s G6300-val (vagy ha 
m6sik cfmt6l (rtuk, akkor azzal) hlvjuk meg a beirt rutint. 
A konnyebb meg6rt6s kedv66rt a program mnemonikus 
form^ja: 

LD HL, 6309H; a kett6spont (23H) cime 



A szerkeszto azert van. 



hogy a lap olyan legyen. 



amilyenek az olvasoi I 



LD SP, 7FA0H 

JP 02CEH ugrSs a SYSTEM-re 

A tobbi szam az al6bbi BASIC-szavak k6dja: 

: - 2 . 

A list£ban ezut^n a program neve kovetkezik. Ez itt hat 
darab 00. (Ekkor teh6t b6rmilyen n6vvel jelolt g6pi k6du 
programot beolvashatunk.) 

Aki nem tuls£gosan j6ratos a monitor haszn6lat6ban, an- 
nak kozlunk egy BASIC-programot. amely elv6gzi a meg- 
felelfi clmek feltolt6s6t. 6s egy kicsit ,.bar6tsagosabb". 

10 CLS^PRINTei2, "GEPI KODU PROGRAM BETOLTESE KULSO 
NR6NET0F0NR0L" : 

Q$="» : INPUT "fl PROGRAM NEVE (0-6 KARAKTER> M ;QS 

m =Q$+STR I NG$ < 6 , 0 > : Q$=LEFTf < Q* , 6) 
26 FOR 1*23344 TO 25356 : READ A : POKE I / A : NEXT : 

POKE 1 6526 > 0 : POKE 16527,39 
38 FOR 1=1 TO 6:A=ASCO1IB$<Q*,I,l>>:P0KE25356+I,A.NEXT 
40 PRINT"EN0EIUE FEL AZ Fl GOMBOT ES 

INDITSft EL A KULSO MAGNETOFONT ! " 

fl=USRV@> 

50 DATA 33/9,95,49, 160, 127, 195,206,2, 35, 206, 50, 44 

Ezt a n6h6ny sort. term6szetesen nem kell 3lland6an befrni 
a g6pbe. C6lszeru felvenni egy kazettara 6s sziiks6g eset6n 
bels6 vagy kuls6 magnetofonnal beolvashatjuk, ah6nyszor 
csak szuks6g van r6. 

Tudom6sunk szerint tobb olyan program van m6r forgalom- 
ban. amelynek beolvastat6sa eddig csak bels6 magnetofon- 
r6l volt Iehets6ges (EDI, TBUG, LEVEL3, FORTH, PASCAL 
stb.). A Tudom6nyszervez6si 6s Informatikai Int6zet is for- 
galmaz olyan oktat6csomagokat, amelyben g6pi k6du prog- 
ramok vannak. Az emh'tett elj6rasunk jobb min6s6gu kulsfi 
magnetofon haszn6latcit is Iehet6v6 teszi, ha a bels6 magn6- 
val a bevitel nem sikerulne. 

A SYSTEM ut6ni pontos folyamat Iefr6sa helyett most ele- 
gedjen meg a tisztelt olvas6 azzal. hogy mukodik a kozolt 
lista, 6s azt csin6lja, amit mar r6g szerettunk volna. 
Programunk felhaszn3l£sahoz \6 munk6t kfvanunk! 

Madarasz Jdzsef IV. o. tanu!6 

Kertesz Bela szakfelugye!6 

T6th Arp6d Gimn6zium. Debrecen 4001 Pf. 49. 



Kovetkezo leveh'ronk inkognitoban szeretne maradni, 
ezert nev nelkul kozoljuk levelet: 

Tisztelt Szerkeszt6s$g ! 

Egy keressel fordulok Onokhoz. Nyar 6ta egy Commodore 
16 -os szamitogep bo/dog tulajdonosa vagy ok. Eleinte 
problemakkal kellett szembeneznem. ugyanis a gep ..nyel- 
vezete" minden szamomra ismert geptol elter. Ezek a 
gondok szerencsere. hosszabb sikertelen probalkozasok 
utan veguf is megszuntek. Nagyon megszerettem a gepet 
es azota szinte mindent. amit elkepzeltem, meg is tudtam 
va/dsitani rajta. Ket problemam azonban nem akar meg- 
oldodni. Az egyik az, hogy tudasomat, amit elsosorban 
szakkonyvekbo/ es a gep pal va/6 rendszeres foglalkozas 
soran szereztem, mas gepaken nem vagy csak alig-alig 
tudom kamatoztatni. Kerdesem. varhato-e, hogy ez a 
geptipus a 64-eshez hasonlo n&pszerusegre tesz szert. 
vagy pedig ez a gep a Commodore ceg egyik rosszul si- 
kerult modellje? Masik kerdesem az. hogy hoi tudnek 
gep i kodban irt jatekprogramot szerezni? 

1. Valoszinuleg nepszeru lesz a C-16 is. AjSnljuk figyelme- 
be a mult havi BIT-LET-iink vezercikket. 

2. Jatek- es egyeb programokhoz ketfelekeppen lehet 
hozzajutni; kulfoldbn penzert vagy itthon mas progra- 
mokert cserebe. C-16 tulajdonosoktol. Ez utobbival valo- 
szinuleg egyelore olyan problema van, hogy meg nem tul 
sok tulajdonos es program van. Kesobb mindkettd valo- 
szinuleg eleg sok lesz. 
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A szerkesztd 1985. m6jusanak v6g6n az 
alabbi felhiv&st int6zte BIT-LET hivei- 
hez: 

„...a hazai kesz/tesu programok infor- 
macioaramlasaban szivesen seg/tene fa- 
punk is. Borzerovatunk ma m6g nines, 
de eppen lehetne. Egy ilyen rovatban 
ki-ki kdzo/hetn6 elado programjainak 
nevet, a program k&tsoros felhasznaldi 
leirasat, a becsult eladasi 6rat 6s azt a 
ci met, ahol boy ebb informAcidt lehet 
kapni a programrol. Hogy ilyen rovat 
lesz-e a BIT-LET-ben. ez e/sdsorban 
Ondkon olvasokon. programozdkon 
mulik. " 

Nos a v6res kard korulhordozdsa m6ris 
eredmdnnyel j6rt. Igy h6t van szeren- 
csenk bejel ent en i a Borze rovat meg- 
szuletes6t. Ime az elso ajanlatok. 

A BIT-LET-ben olvastam. hogy letre akarnak 
hozni egy olyan rovatot. amelyben progra- 
mokat lehet eladni. csereberelni. Ezt kivalb 
otletnek tartom. de vegyek bele ebbe a rovat- 
ba az amatbrok altal keszi'tett programok aru- 
sit^s^t is. Ezzel - szerintem - nagyobb sikert 
aratna a szbban forg6 rovatuk. De - hogy 
mmdez ne legyen ures szobeszed -. szeretnek 
en is bekuldeni egy ilyen programajanlatot. 
Ajanlott program: LEVEL 4 BASIC - 
bdvitd. Gepi kbdu HT-1080Z iskolaszamitb- 
gepre. Rendkivuli gyorsasag ! Aktfv keperny<5- 
hasznalat. £rtek: megegyezes szerint! 
TovSbbi felvil^gosft^s es reszletes leiras. 
Tam^s Ferenc, Nagykanizsa. Bart6k B. u. 5. 
2/2/3 8800 



A C64-hez haszn^lt legegyszerubb printere- 
ken (MPS801 . SEIKOSHA GP-1 00VC. 1 525) 
megoldottuk a karakterek tetszes szerinti 
valtoztatasat tisztan szoftver uton. A KERNAL- 
rutinok mampulaiasSval gepi kbdu szub- 
rutinokat illesztettunk az oper£cibs rendszer- 
hez. fgy a gep normal m6don hasznSlhatb es 
programozhatb. csak 6ppen bizonyos karak- 
terek helyett m^st ir a kepernybre es a papfrra. 
£s ami uj a hason!6 programokkal szemben: 
hogy melyik billentyu milyen jelet jelentsen. 
azt a felhasznalb maga szerkesztheti meg egy 
EDITOR program segi'tsegevel. mely a screen- 
editorhoz hasonlb kurzoros m6dszerrel 6s 
sokfele szolgaltatSssal teszi jatekosan kony- 
nyuve a megfelelb dot-mcitrixok kialakftSsat. 
fgy akar tobbfele karakterkeszlet is tarolhatb. 
s munka elbtt a szukseges behfvhatb egy 
LOADER program segftsegevel. mely azt is 
megkerdezi. hoi foglaljon le helyet a membria- 
ban a kepernyb es a karakterkeszlet sz£ma>a. 
A COOO-val kezd<5d(5 teruletet valasztva az is 
elerhetb. hogy a szabad BASIC-terulet nem 
csokken, hanem meg 1 kByte-tal nb is. 
Aki tehat olyan lehetbseget keres. hogy ekeze- 
tes betuket vagy m£s jeleket is tudjon nyom- 
tatni a printere. az forduljon hozzank. mert 
jobb programot kap olcs6bban. mint ma's 
hasonl6 termekek. 

A program neve legyen mondjuk CLEVER 
801, az ira 10 000 Ft m£gneslemezzel es 
preciz leirassal egyutt. Ha megrendelblevelet 
kuldenek a dmunkre. mi szemelyesen visszuk 



el a programot. s a hasznalatbavetelhez ut- 
mutat6t is adunk. Cimunk. ahonnan felvilago- 
sit^st vagy bemutat6t is lehet kernr 
REGISZTER GM 

2120 Dunakeszi. Garas u 10 IV 14 
Tel. 27/41-636 



A Commodore Szekci6 elkezdi a ..klubleme- 
zek" akci6t. A ..klublemezek" a VC 1541 
lemezegysegekhez keszi'tett ketoldalas leme- 
zeken kerulnek forgalomba. A lemez egyik 
oldala a felhaszncilb reszere szabadon prog- 
ramozhatb ures. de format, mi'g a masik olda- 
lon mintegy 1 00 blokk terjedelemben trukkok. 
a gephasznalatot segitb professzionahs alkal- 
maz^si es jatekprogramok talSlhatbk. A le- 
mezek ara, a celnak megfelelben. lenyegesen 
alacsonyabb. mint az itthon megszokott. es 
a lemezeken csak MagyarorszSgon masok 
altal szerzbi jogi vedelemben nem reszesitett 
programok lesznek. Kulonleges szolgaltatSs 
az is. hogy a haszn^lathoz szukseges hardver- 
eszkozoket. (botkormany) is hozzS adjuk. 
Az eddig meglevfi programok a kovetkez6k 

• Tesztk6rd6sek (36 blokk): Oktatasi se- 
gedlet. mellyel tesztk6rd6sek (allom^nyon- 
k6nt maximum 100) alli'thatbk ossze (leme- 
zenkent maximum 15 lehet). Ezeket lehet 
szerkeszteni. lemezre venni. a tanulbk vSlaszai 
alapj^n adott osztalyzatokat is lemezre lehet 
vinni; a ke>deseket lehet cserelni. javftani. 
uj kerd^sekkel kiegeszfteni. Iemezr<5l betol- 
teni. a lemezek lemezazonosftbkkal is el- 
Iathat6k es torolhet6k. 

• Sz6t&rk6szit8 (15 blokk): szavak. ev- 
szamok. kifejezesek stb. begyakorlasara szol- 
gal6 program. A sz6tart lehet: b6v(teni. 
javftani. lemezre vagy szalagra vinni. onnan 
visszahozni. a tanulast ellen^rizni. A rendszer 
a rossz valaszokat gyujti. es vegen kifrja. 

• HI-RES kdpnyomtatd (1 blokk) A 
nagyfelbont^su kepet keperny6re. vagy 
VC 1525. vagy MPS 801 tipusu nyomtatbra 
viszi. 

• Taxi (46 blokk). Kozlekedesi jatek bot- 
kormannyal. A jatekos ..taxijaval" a diszpecser 
illetve utas ^Ital megadott helyekr<5l mcis 
helyekre visz utasokat. Az utvonalat a kep- 
erny6n Iev6 terkep alaj^n maga valasztja meg. 
Utkozben forgalmi lampak. keresztez6 jar- 
muvek akad^lyozza^k. illetve a megtehetb ut 
hosszat az uzemanyagfogy^s korl^tozza. 

• Fuggv6nyk6zelit6s (21 blokk) : Az ada- 
tokat billentyuzetrGI vagy lemezr<5l fogadb, az 
eredmenyeket a keperny6re. vagy nyomtatbra 
viv<5 meresadat-feldolgoz6 program. Tetszes 
szerinti szSmu valtoz6ju automatikus fugg- 
venykozelftest v£gez. A szokasos megolda- 
sokt6l elter6en, nemcsak a fuggveny allandbit 
optimalizSlja. hanem mag^t a fuggvenyform^t 
is. 

.Grafikus nyelv (47 blokk): Egyszeru kis 
terfoglalSsu BASIC-b6l is h(vhat6 grafikus 
nyelv. pont-vonal rajzolb es torl6. valamint 
keperny(5torl(5 utasi'tassal Nagyfelbontasu 
grafikat haszn^l. 

.Szukitett LOGO (45 blokk): A LOGO- 
nyelv ..teknGc-grafik^nak" 30 parancs^t 
va!6si'tja meg (beleertve az elj^rasok haszn^la- 
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tat) . Onmagat az cljarast sem kozvetlenul. 
sem kozvetve nem hlvhatja meg. Kepszer- 
kesztest. nevlistaz^st. nyomtatast. n^vv^ltoz- 
tatast. eljar^sok lemezre vagy kazettSra vitelet 
es betolteset. lemezen tortest vegez. 

• Assembler - disassembler (16 blokk) 
Egymenetes fordlt^st (masodlagos utasita 
sok. pszeudo-oper^torok) haszn^latat lehe- 
tfive tev<5. egyuttal a hasznal6t az assembler 
nyelvre tanft6 hexa- es decimalis bemenetu 
assembler. 

• Ge*pi kodu programkeszitb segedlet 

(12 blokk). Programbeirast. soron beluli 
javit^st. programmentest. betoltest. ossze- 
kapcsolast lehet<5v<§ tev6 eszkoz. 

• Lemezprogramot automatikusan in- 
ditd rutin (11 blokk) : A LOAD . . .8.1 forma 
alkalmazas^t teszi lehet<3ve a felhasznalb altai 
irt programn£l. 

mf - billentyu k programoz&sa~ra szol- 
gal6 program (8 blokk) lehetove teszi ezen 
a billentyuk programozas^t. es a program 
menteset. 

• UgorJ (14 blokk): Urinvazi6s tipusu jatek. 
mK4t szdlam (28 blokk): A billentyuzet 
ket fel6t. mint fuggetlen szblamot viv6 billen- 
tyuzetet hasznal. 

• MERGE (5 blokk) : Lemezen lev<5 progra- 
mot kapesol a ta>ban lev6hoz. 

% RENUMBER (2 blokk): Megadhatb no- 
vekmenyu es kezdberteku ujraszamozb 
(SIMON'S BASIC-t6l elterben az ugrbutasi- 
tasok cimeit is megfelelfien mbdositja). 

• K6pvizsga!6 (12 blokk): KOALA PAINT 
es egyeb kepvizsgalat. ^thelyez6s. beolvasas. 
atfordit^s. 

• BASIC 6s gepi program dsszekapeso- 

16 (16 blokk): Tombkivalasztb es kapcsolb. 

• Fiiggvenyforma betoltd BASIC-prog- 
ramba (5 blokk) Tetszes szerinti. de nem tui 
bonyolult fuggvenyt lehet bevmni az INPUT- 
utasi'tassal. 

• GET-haszn6l6 (4 blokk): A gep a GET - 
haszn^lataval bealli'thatb hosszus^gu maxi- 
mum 1 91 sz£m. vagy alfanumenkus karakter- 
sorozatot fogad el. 

• SORT-utasit4s (18 blokk): BASIC-b6l 
hfvhato gepi k6du sorbarendezfi. A rendezes 
novekvb vagy cs6kken<5 rendben es vagy az 
adaton belul kijelolt parameter szerint torte- 

nik. 

• Allom6nykezel6 (30 blokk) Nagy (maxi- 
mum 30 kbyte) ^llom^nyok kezel£sere szol- 
gal6 program, az adatmezb maximum 80 ka- 
rakter. Alkalmas: uj rekord. allomany keszite- 
sere. osszekapcsol^sara. torlesere. ures allo- 
many keszites^re. vizsgalatara. az adatmezb 
rendezes6re. alfabetikusan novekvb rendbe. 
mbdosit^sra. 

.MULTIPROCESSING (14 blokk) 
Hasznalataval tobb program futhat egyideju- 
leg. 

Egy lemez ara botkormannyal egyutt 
5000 Ft. 

Ugyintezo: Olle Tibor 14. sz. UMK. Budapest 
VII . R^kbczi ut 8/a. 

Ez az a> minden lemezre 6rv^nyes a Mikro- 
magazm 85/2 sz^m^nak 28. oldalcin ismerte- 
tett program kivStelevel. Ez a professzionahs 
fejlesztb program, amelyhez hasonlbt nem 
ismerunk. ara. 20 000 Ft 



SZAMITASTECHNIKAI ME LLEKIET SEPTEMBER 



Kdvetkezo szamunk: okt6be r29 * n je,e - nik meg de addi9 ' 



minden heten az Otletben szamitastechnika 



A PRIMOnyero J. feladat megold&sa: 



a) llyen der6kszogu h6romszog nines. Legyen ugyanis a h^romszog k6t oldala a 6s b ugy. hogy a 2 ~b 2 = 15 teljesuljon. 
Ekkor (a + b) ♦ (a-b) = 15. s mivel a 6s b pozitiv eg6sz, ez6rt vagy 

a + b = 5 a + b = 15 

, vagy 

a-b = 3 a-b = 1 

Az els6 esetben a = 4, b = 1. s mivel se 16 + 1 = 17. se 16-1 = 1 5 nem n6gyzetszam, ez6rt ezek nem lehetnek egy eg6sz 
oldalu der6kszdgu h6romsz6g oldalai. 

A m6sodik esetben a = 8. b - 7. 6s se 64 + 49 = 1 1 3. se 64-49 = 1 5 nem n6gyzetsz^mok. igy megint arra jutunk. 
hogy ezek sem lehetnek egy megfelel6 h6romszbg oldalai. Mivel a 1 5 m6shogy nem bonthat6 fel egy pozitiv eg6sz 
6s egy eg6sz sz6m szorzat6ra. bizonyit6sunkat befeieztuk. 
1 526 1 527 

b) 1 +2+ +1 526 = 2 minek a primt6nyez6s felbont6sa 3 7 .109 . 509. Feltehetjuk. hogy a kapitSny 

100 6vesn6l fiatalabb, s 18 6vesn6l id6sebb. fgy csakis 21 6ves lehet. (Lehetseges. hogy ilyen fiatal kapit6nyok 
nem nyuzsognek a vil6gon, de a mi kapit6nyunk pap6ja magas rangu szem6lyis6g. s 6 maga nagyon tehets6ges volt, 
kulhonban 6s 6v6sszevon^sokkal v6gezte iskol£it. Mindenesetre megfelel6 indoklcissal a 109 6ves kapitcinyt is elfogad- 
juk helyes megfejt6snek). 




fg6retunkhoz hiven a Tudomanyszervez6si es Informatikai Intezet es a Bit-let ujabb kozos - h6romfordul6s szakkori 
p6ly3zatot indi't. ket kateg6ri6ban. A k6t kateg6riat az6rt tartjuk szuksegesnek. mert el6z6 p2ly2zatunk sor6n kiderult. 
hogy egy sor olyan szintu szakkor mukodik mar az orszagban. amelynek szfnvonala I6nyegesen magasabb a tobbi 
paly6zatunkban sz^mba johet6 kozoss6gn6l. A kategoriz6l6st teh6t kiz3r6lag az eddigi k6t p6ly6zatunkon el6rt' 
eredm6nyek alapjan v6geztuk. Ily mbdon etsd kategoriaban indulhatnak a kdvetkezo iskolak szakkorei: 
ELTE Apaczai Gimn., Bp. • Berze Nagy J. Gimn., Gydngyos • Berzsenyi D. Gimn., Bp. • /. sz. /pari 
Szakkozepisk., Miskolc • Fazekas M. Gimn., Debrecen • F 6 Ides F. Gimn., Miskolc • 600. sz. I pari 
Szakmunkaskepzd Int., Szeged • J ATE Sagvari Gimn., Szeged • Katona J. Gimn., Kecskemet • Kolos 
R. Finommech. Szki., Bp. • Leovey K. Gimn., P6cs • Mdricz Zs. Gimn., Szentendre • Mdricz Zs. Gimn., 
Tiszakecske • Piarista Gimn., Bp. • Roth Gy. Erddgazd. Szki., Sopron • Svetits Gimn., Debrecen • 
Szalvay M. Uttordhaz, Kecskemet • Szechenyi I. Gimn., Sopron • Varga K. Gimn., Szolnok • Vorosmarty 
M. Gimn., £rd 

Masodik kategoriaban indulhatnak: minden olyan ciltal6nos iskola. koz6pfoku intezmeny. uttor6haz 6s HT-klub 
szakkorei. csapatai, mely int6zm6nyek nincsenek benne az e!6bbi felsorol6sban. 
Palyazati feltetelek: 

1. Minden programot HT-1080Z (HT-2080Z) gepre kell elk6szfteni, s kazettan kell bekuldeni. Iegal6bb h6romszor 
felv6ve, lehet<5leg kulonbozo g6peken. A vegleges programok kazettara ment6se ut£n mindh6rom p6ld6nyt olvastassuk 
be a g6pbe (ha lehet m6sikba. mint amelyiken felvettuk). s ujra teszteljuk le! Ha egy program egyik v6ltozat6t se 
tudjuk betolteni 1-2-3-szori pr6b3lkoz6s utan sem. illetve ha a program hib6s, nem tudjuk 6rt6kelni. s [gy 0 pontot kap. 

2. A kazettara. vagy a doboz6ban valamilyen papirra felt6tlenul irjuk fel, hogy a kazettan mett6l meddig. milyen 
programok tal3lhat6k. s hogy a felv6tel r6gi vagy uj gepen k6szult-e? 

3. Ha a kazetta betolt6se e!6tt a g6pen valamilyen tennival6 van (b6vi't6s kikapcsol6sa. RAMTOP alh'tcisa). ezt jelezz6k 
ezen a helyen is. 

4. A pcilycizatnak ezen kivul tartalmaznia kell egy Ieir6st. melyen fel van tiintetve az iskola pontos cfme 6s a szakkor 
neve (s ez minden foru!6ban ugyanaz legyen!), s melyben roviden lefrjak a program haszn6lat3t es mukod6s6t 
(algontmus^t) szoveggel. 

5. A paly6zatokat a bekuld6si hat6rido napj^n 24 6r6ig kell post6ra adni a kdvetkezo clmre: 

TUDOMANYSZERVEZeSI £S INFORMATIKAI INTEZET, MIHALYFI JANOS 1111 BUDAPEST. EGRI JOZSEF U. 
1-9. E EPULET 

Az olyan palyazatokat, melyek a fenti felteteleknek nem tesznek maradektalanul eleget, nem 6rt6keljiik. 

A p^lycizat ket kisebb 6s egy nagyobb feladatb6l fog 6llni, a kisebbek 50. a nagyobb feladat 100 pontot fog 6rni. 
Ebben a szSmban az els6 kisebb feladatot kozoljuk, a kovetkez6ben a nagy feladatot. s a harmadik fordu!6ban a m6sik 
kicsit; a masodik 6s a harmadik feladat bekuld6si hat6rideje azonos lesz. 

A p&ly&zat dljai: az I. kategbriaban az els6 dij ism6t egy 64 K-s HT-g6p. a masodik kateg6ri6ban pedig egy PRIMO! 
S most l&ssuk az els& feladatot: 

keszitsunk programot, mely jol jatssza a kozismert MALOM nevu jatekot ( lei r a sat I. pi. Zdzislaw No wok: 
50 tab/as jatek c. konyveben a 12. oldalon). 

Az egyik Jatek os a gep legyen, s „6" adminisztralja a jatekot, jelenitse meg 
" a pillanatnyi allast, 6s lehet 6 leg nyerjen. Ezenkivul azt is megkivanjuk, hogy 
1 a program he pes legyen bizonyos foku tanulasra, azaz a jatekok sor an egy re 
| okosabb legyen, egy csapdaba ne essen bele kStszer. Fontos elbiralasi 
§ szempont lesz, hogy milyen jol tud tanulni a gep r a jatszmak kozbeni 
1 informaciokat milyen J6I hasznositja, s hogy milyen gyors a program. 
(Az ember nem szivesen til le olyan programmal jatszani, mely minden 
lepesen egy negyeddrat gondolkodik). A leirasnak tartalmaznia kell a 
program jatszasi strategiajat 6s tanulasi mechanizmusat ! 
Sikeres vetelkedest ! 




Kerjuk levagni es a levelre f elragasztani I 
Bekuldesi hataridfi oktdber 30 
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